Simplification of discriminant from scale-rotated-ellipse

Time bar (total: 35.7s)

start0.0ms (0%)

Memory
0.2MiB live, 0.2MiB allocated

analyze606.0ms (1.7%)

Memory
-8.5MiB live, 1 955.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.2s (20.3%)

Memory
-65.7MiB live, 21 097.5MiB allocated
Samples
4.6s4 242×1valid
1.0s997×2valid
760.0ms3 017×0valid
26.0ms86×1exit
Precisions
Click to see histograms. Total time spent on operations: 5.9s
ival-cos: 1.4s (24.2% of total)
ival-sin: 1.3s (22.3% of total)
ival-mult: 1.1s (18.5% of total)
ival-pow2: 740.0ms (12.5% of total)
ival-div: 696.0ms (11.8% of total)
adjust: 265.0ms (4.5% of total)
ival-sub: 152.0ms (2.6% of total)
ival-add: 131.0ms (2.2% of total)
ival-pi: 57.0ms (1% of total)
exact: 15.0ms (0.3% of total)
ival-true: 7.0ms (0.1% of total)
ival-assert: 4.0ms (0.1% of total)
Bogosity

explain1.1s (3%)

Memory
9.1MiB live, 3 050.7MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1600-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)))
1260-0-(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
1260-0-(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
350-3(4.4182854621723604e+204 -2.4240887462579235e-263 -3.906672693519613e-169 -6.147478794139728e+191 -3.492129984548689e+190)(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))
340-2(-8.979952222677751e-157 -3.085096700708546e-72 -2.6590657285905378e-110 1.1192517307840412e-291 -5.559223141413312e-112)(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)
330-2(-4.4502911418454794e-272 -1.0279759398781726e-159 -4.0567491571468253e-50 -2.650401063960965e-245 3.0327504733445845e-80)(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)
310-0-(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
300-0-(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)
270-1(3.882752064305611e+51 3.494104199122297e+33 2.1252402062619474e-186 -1.0215037599194824e+237 -5.809251250881004e-269)(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)
180-0-(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)
150-0-(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))
90-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))
00-0-(*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))
00-0-#s(literal 4 binary64)
00-0-y-scale
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
-.f64(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))nan-rescue1330
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow184
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow246
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)overflow186
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow184
(pow.f64 b #s(literal 2 binary64))overflow130
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))overflow133
(pow.f64 a #s(literal 2 binary64))overflow146
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow246
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)overflow190
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)overflow102
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)overflow104
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow65
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))overflow138
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow34
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow103
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow46
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow98
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow96
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow99
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow73
(*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))overflow102
cos.f64(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))sensitivity1260
sin.f64(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))sensitivity1260
*.f64(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.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*o300
/.f64(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (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/n280
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow92
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow123
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow123
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow92
(pow.f64 b #s(literal 2 binary64))overflow65
(pow.f64 a #s(literal 2 binary64))overflow73
/.f64(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(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/n280
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow65
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow103
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow46
/.f64(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(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/n270
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow99
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow73
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow34
-.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 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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/n210
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow92
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow123
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow92
(pow.f64 b #s(literal 2 binary64))overflow65
(pow.f64 a #s(literal 2 binary64))overflow73
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow123
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)overflow95
-.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))overflow65
(pow.f64 a #s(literal 2 binary64))overflow73
*.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*o140
/.f64(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)o/n140
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow65
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow103
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow46
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow98
*.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*o80
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)underflow39
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow59
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow20
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow81
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(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))underflow39
(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow22
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)overflow104
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow73
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow34
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow96
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow99
/.f64(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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/n70
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow73
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow34
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow96
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow99
/.f64(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)u/n50
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow17
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow48
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow87
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow26
(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*u50
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)overflow102
(*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))overflow102
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow65
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow103
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow46
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow98
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)underflow36
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow48
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow87
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow26
(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)underflow23
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow17
*.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*u50
/.f64(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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))))underflow22
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow59
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow20
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow81
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(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 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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/n40
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow20
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))underflow12
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow20
(pow.f64 b #s(literal 2 binary64))underflow59
(pow.f64 a #s(literal 2 binary64))underflow48
(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))))underflow12
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)underflow23
/.f64(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)u/n30
(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow22
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow59
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow20
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow81
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow2
/.f64(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)u/n20
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow20
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))underflow12
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))underflow12
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow20
(pow.f64 b #s(literal 2 binary64))underflow59
(pow.f64 a #s(literal 2 binary64))underflow48
(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))underflow48
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow87
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow26
(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)underflow23
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow17
*.f64(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.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))))overflow123
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow123
(pow.f64 b #s(literal 2 binary64))overflow65
(pow.f64 a #s(literal 2 binary64))overflow73
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow2
Confusion
Predicted +Predicted -
+2012
-3023
Precision
0.8701298701298701
Recall
0.9901477832512315
Confusion?
Predicted +Predicted MaybePredicted -
+20102
-30023
Precision?
0.8701298701298701
Recall?
0.9901477832512315
Freqs
test
numberfreq
025
141
265
370
426
524
65
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
324.0ms314×1valid
77.0ms66×2valid
39.0ms132×0valid
Compiler

Compiled 1 310 to 121 computations (90.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 375.0ms
ival-sin: 87.0ms (23.2% of total)
ival-cos: 81.0ms (21.6% of total)
ival-mult: 71.0ms (18.9% of total)
ival-pow2: 47.0ms (12.5% of total)
ival-div: 45.0ms (12% of total)
adjust: 19.0ms (5.1% of total)
ival-sub: 10.0ms (2.7% of total)
ival-add: 9.0ms (2.4% of total)
ival-pi: 4.0ms (1.1% of total)
ival-true: 1.0ms (0.3% of total)
exact: 1.0ms (0.3% of total)
ival-assert: 0.0ms (0% of total)

preprocess208.0ms (0.6%)

Memory
-13.5MiB live, 430.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)

prune1.0ms (0%)

Memory
3.1MiB live, 3.1MiB allocated
Alt Table
Click to see full alt table
StatusAccuracyProgram
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 (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)

simplify179.0ms (0.5%)

Memory
9.3MiB live, 404.9MiB allocated
Algorithm
egg-herbie
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
cost-diff384
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)
cost-diff704
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
cost-diff6144
(pow.f64 a #s(literal 2 binary64))
cost-diff6144
(pow.f64 b #s(literal 2 binary64))
Rules
8 778×lower-*.f32
8 756×lower-*.f64
2 492×lower-fma.f64
2 492×lower-fma.f32
2 010×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

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

localize280.0ms (0.8%)

Memory
22.0MiB live, 741.8MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy7.857905404022348
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))
accuracy27.296392716905512
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
accuracy27.33895304260337
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
accuracy39.285767575338014
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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
165.0ms157×1valid
39.0ms33×2valid
18.0ms66×0valid
Compiler

Compiled 598 to 41 computations (93.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 190.0ms
ival-sin: 45.0ms (23.6% of total)
ival-cos: 44.0ms (23.1% of total)
ival-mult: 35.0ms (18.4% of total)
ival-pow2: 24.0ms (12.6% of total)
ival-div: 22.0ms (11.6% of total)
adjust: 9.0ms (4.7% of total)
ival-sub: 5.0ms (2.6% of total)
ival-add: 4.0ms (2.1% of total)
ival-pi: 2.0ms (1.1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series145.0ms (0.4%)

Memory
-2.8MiB live, 388.9MiB allocated
Counts
8 → 288
Calls
Call 1
Inputs
#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())
#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())
#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())
Outputs
#s(alt (pow b 2) (taylor 0 b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor 0 b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor 0 b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor 0 b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor -inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor -inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor -inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor -inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor 0 a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor 0 a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor 0 a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor 0 a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor -inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor -inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor -inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor -inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor inf b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor inf a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (* (pow angle 2) (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))) (taylor 0 angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))) (taylor 0 angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (taylor 0 angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))) (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/1469328076800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/4407984230400000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/30855889612800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))) (* 2 (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))))))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2)))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4)))))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4))))))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/180 (* angle (PI))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI)))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5))))))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5)))))))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))) (taylor inf a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))) (taylor inf a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))) (taylor inf a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))) (taylor -inf a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))) (taylor -inf a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))) (taylor -inf a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor 0 angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (taylor 0 angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))) (taylor inf b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))) (taylor inf b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))) (taylor inf b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))) (taylor -inf b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))) (taylor -inf b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))) (taylor -inf b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (patch (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #<representation binary64>) () ())) ())
Calls

72 calls:

TimeVariablePointExpression
14.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)))
7.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
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))
5.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))

simplify371.0ms (1%)

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

Useful iterations: 0 (0.0ms)

IterNodesCost
045216440
1176515416
0852315091
Stop Event
iter limit
node limit
Counts
288 → 288
Calls
Call 1
Inputs
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))
(+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))
(+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (* (pow angle 2) (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))
(* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))))
(* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* 1/90 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))) (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/1469328076800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/4407984230400000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/30855889612800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))) (* 2 (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
1
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(* 1/180 (* angle (PI)))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* 4 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))
(+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow a 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))
(* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow a 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))
(* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* 4 (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* 4 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))
(+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow b 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))
(* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow b 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))
(* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
Outputs
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 b (*.f64 b (fma.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 b (*.f64 b (fma.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 angle (*.f64 angle (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (* (pow angle 2) (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))
(*.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1/196830000 binary64)) (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))))
(*.f64 (*.f64 angle angle) (fma.f64 (*.f64 (*.f64 angle angle) #s(literal 4 binary64)) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 1/32400 binary64)) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal -1/787320000 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))))))
(*.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 (*.f64 angle angle) #s(literal 4 binary64)) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1/32400 binary64)) (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) #s(literal -1/347128758144000000000 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 1/32400 binary64)) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1/196830000 binary64))) (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a a))) (*.f64 b (*.f64 b (*.f64 x-scale y-scale)))))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a a))) (*.f64 b (*.f64 b (*.f64 x-scale y-scale)))))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a a))) (*.f64 b (*.f64 b (*.f64 x-scale y-scale)))))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a a))) (*.f64 b (*.f64 b (*.f64 x-scale y-scale)))))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a a))) (*.f64 b (*.f64 b (*.f64 x-scale y-scale)))))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a a))) (*.f64 b (*.f64 b (*.f64 x-scale y-scale)))))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)))))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 b b))) (*.f64 (*.f64 (*.f64 a a) x-scale) y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 b b))) (*.f64 (*.f64 (*.f64 a a) x-scale) y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 b b))) (*.f64 (*.f64 (*.f64 a a) x-scale) y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)))))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 b b))) (*.f64 (*.f64 (*.f64 a a) x-scale) y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 b b))) (*.f64 (*.f64 (*.f64 a a) x-scale) y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 b b))) (*.f64 (*.f64 (*.f64 a a) x-scale) y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)))))
(* 1/90 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))
(*.f64 angle (fma.f64 (PI.f64) (*.f64 (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 x-scale y-scale)) #s(literal 1/90 binary64)) (*.f64 (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -1/4374000 binary64)))))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))) (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))))
(*.f64 angle (fma.f64 (PI.f64) (*.f64 (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 x-scale y-scale)) #s(literal 1/90 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 x-scale y-scale)) #s(literal 1/1417176000000 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 angle angle)) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -1/4374000 binary64))))))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/1469328076800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/4407984230400000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/30855889612800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))) (* 2 (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))))))
(*.f64 angle (fma.f64 (PI.f64) (*.f64 (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 x-scale y-scale)) #s(literal 1/90 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 x-scale y-scale)) #s(literal 1/1417176000000 binary64) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 x-scale y-scale))) #s(literal -29/30855889612800000000 binary64) (*.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 x-scale y-scale))))))) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -1/4374000 binary64))))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (fma.f64 b (*.f64 b (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 angle angle) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1/196830000 binary64) (*.f64 #s(literal -4 binary64) (fma.f64 b (*.f64 b (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 a (*.f64 a (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) (*.f64 #s(literal -4 binary64) (fma.f64 b (*.f64 b (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1/196830000 binary64) (fma.f64 (*.f64 (*.f64 angle angle) #s(literal 4 binary64)) (-.f64 (fma.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 1/32400 binary64)) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) a) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 a (*.f64 a (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -4 binary64) (fma.f64 b (*.f64 b (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 a (*.f64 a (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))) (fma.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (fma.f64 b (*.f64 b (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
1
#s(literal 1 binary64)
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(fma.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal -1/64800 binary64) (*.f64 angle angle)) #s(literal 1 binary64))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(fma.f64 (*.f64 angle angle) (fma.f64 angle (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/25194240000 binary64))) (*.f64 (PI.f64) (*.f64 (PI.f64) #s(literal -1/64800 binary64)))) #s(literal 1 binary64))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))
(fma.f64 (*.f64 angle angle) (fma.f64 (PI.f64) (*.f64 (PI.f64) #s(literal -1/64800 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/24488801280000000 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/25194240000 binary64))))) #s(literal 1 binary64))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(* 1/180 (* angle (PI)))
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(*.f64 angle (fma.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal -1/34992000 binary64)) angle) angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))
(*.f64 angle (fma.f64 (*.f64 angle angle) (fma.f64 angle (*.f64 angle (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal -1/34992000 binary64))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))
(*.f64 angle (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) #s(literal -1/30855889612800000000 binary64)) (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal -1/34992000 binary64))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(+ (* 4 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (fma.f64 a (*.f64 a (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* (pow a 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))
(*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 4 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 a a))))
(* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (+.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 a a)))))
(* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (+.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 a a)))))
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* (pow a 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))
(*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 4 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 a a))))
(* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (+.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 a a)))))
(* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (+.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 a a)))))
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(+ (* 4 (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (fma.f64 angle (*.f64 angle (fma.f64 b (*.f64 b (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))
(fma.f64 (*.f64 (*.f64 angle angle) #s(literal 4 binary64)) (fma.f64 (*.f64 angle angle) (fma.f64 b (*.f64 b (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 a (*.f64 a (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (fma.f64 b (*.f64 b (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) a) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 a (*.f64 a (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (fma.f64 b (*.f64 b (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 a (*.f64 a (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(+ (* 4 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (fma.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (fma.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* (pow b 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))
(*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 4 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 b b))))
(* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 b b)))))
(* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 b b)))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* (pow b 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))
(*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 4 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 b b))))
(* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 b b)))))
(* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 b b)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))

rewrite308.0ms (0.9%)

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

Useful iterations: 0 (0.0ms)

IterNodesCost
039262
070210
1266210
22077185
08541184
Stop Event
iter limit
node limit
iter limit
Counts
8 → 532
Calls
Call 1
Inputs
(pow.f64 b #s(literal 2 binary64))
(pow.f64 a #s(literal 2 binary64))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))
Outputs
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 b)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 b)) #s(literal 1 binary64)))
(pow.f64 b #s(literal 2 binary64))
(pow.f64 (*.f64 b b) #s(literal 1 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 b))
(*.f64 b b)
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 a)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 a)) #s(literal 1 binary64)))
(pow.f64 a #s(literal 2 binary64))
(pow.f64 (*.f64 a a) #s(literal 1 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 a))
(*.f64 a a)
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) y-scale))
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (neg.f64 (*.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) y-scale)))
(/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 y-scale (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale)) (*.f64 (*.f64 x-scale y-scale) y-scale))
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale))) (*.f64 (*.f64 x-scale y-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (*.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale))) (*.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale))) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale)) (*.f64 (neg.f64 y-scale) y-scale))
(/.f64 (neg.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (neg.f64 y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (neg.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(/.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) y-scale)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (neg.f64 y-scale))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (neg.f64 (*.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)))) (neg.f64 (*.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (neg.f64 y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (neg.f64 (*.f64 (neg.f64 y-scale) (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 y-scale) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)))) (neg.f64 (*.f64 y-scale (neg.f64 y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale))) (neg.f64 (*.f64 (neg.f64 y-scale) y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (neg.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)))) (neg.f64 (neg.f64 (*.f64 y-scale y-scale))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))) (neg.f64 (neg.f64 y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)))) (neg.f64 (neg.f64 y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))) (neg.f64 (neg.f64 y-scale)))
(pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) #s(literal -2 binary64))
(pow.f64 (pow.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) #s(literal 2 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -1 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(*.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) #s(literal 2 binary64)))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale)) y-scale))
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale)) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) y-scale) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) #s(literal 2 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) #s(literal 2 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) #s(literal 2 binary64)))
(*.f64 (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)))
(*.f64 (exp.f64 (log.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))) (exp.f64 (log.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) (neg.f64 x-scale)))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) (neg.f64 x-scale)))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) (neg.f64 x-scale)))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) (neg.f64 x-scale)))
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (neg.f64 x-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (neg.f64 x-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) (neg.f64 x-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (neg.f64 x-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) x-scale))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) (neg.f64 x-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) #s(literal -1 binary64)) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 #s(literal 2 binary64) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (/.f64 #s(literal 1 binary64) x-scale)) y-scale))
(*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale))
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) y-scale))
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 #s(literal 1 binary64) x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale))
(*.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)) y-scale))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) x-scale))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (neg.f64 x-scale)))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 y-scale #s(literal 1 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) x-scale))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (neg.f64 x-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) y-scale) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) x-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) (neg.f64 x-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) y-scale) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) x-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (neg.f64 x-scale)))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) y-scale) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) x-scale))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (neg.f64 x-scale)))
(*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale))
(*.f64 (/.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) y-scale) (/.f64 (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) #s(literal 2 binary64)) y-scale))
(*.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) y-scale) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)))
(exp.f64 (*.f64 (log.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) #s(literal 1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 y-scale (neg.f64 x-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 y-scale (neg.f64 x-scale))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 (*.f64 x-scale y-scale))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))))
(neg.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) y-scale)
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (neg.f64 (neg.f64 y-scale)))
(/.f64 #s(literal 1 binary64) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (neg.f64 y-scale))
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (neg.f64 (neg.f64 (neg.f64 y-scale))))
(/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) y-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) #s(literal 1 binary64))))
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 1 binary64)) y-scale)
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (neg.f64 (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) y-scale)) (neg.f64 (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 #s(literal 1 binary64) y-scale)) x-scale)
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (/.f64 #s(literal 1 binary64) y-scale)) (neg.f64 x-scale))
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) x-scale)
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 1 binary64))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 x-scale) y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 1 binary64))) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 #s(literal 1 binary64) y-scale))) (neg.f64 x-scale))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (/.f64 #s(literal 1 binary64) y-scale))) (neg.f64 (neg.f64 x-scale)))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale)) (neg.f64 x-scale))
(pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 1 binary64))
(pow.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) y-scale) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale))
(*.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))
(*.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)))
(*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale))
(*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale))
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (pow.f64 (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (pow.f64 (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 1 binary64)) (pow.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 1 binary64)) (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 1 binary64)) (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 1 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) y-scale) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) y-scale) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) #s(literal 1 binary64)) (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 1 binary64)))
(*.f64 (/.f64 #s(literal 2 binary64) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale))
(*.f64 (/.f64 #s(literal 2 binary64) y-scale) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale))
(*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) y-scale))
(*.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #s(literal -1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale))
(*.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #s(literal -1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) x-scale))
(*.f64 (/.f64 #s(literal 2 binary64) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale))
(*.f64 (/.f64 #s(literal 2 binary64) x-scale) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) y-scale))
(*.f64 (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) y-scale))
(*.f64 (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale))
(*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale))
(*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) y-scale))
(*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #s(literal 2 binary64)) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) y-scale))
(*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale))
(*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) x-scale) (/.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale))
(*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) y-scale) (/.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale))
(*.f64 (/.f64 #s(literal -1 binary64) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)))
(*.f64 (/.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)))
(*.f64 (/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (neg.f64 x-scale)))
(*.f64 (/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) y-scale) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (neg.f64 x-scale)))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal -1 binary64)) (/.f64 (neg.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal -1 binary64)) (/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) x-scale)) y-scale))
(*.f64 (/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #s(literal -1 binary64)) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale))
(+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(-.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))))
(-.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))
(-.f64 (/.f64 (*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) y-scale) (*.f64 y-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale))) (*.f64 y-scale (*.f64 y-scale y-scale))))
(-.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale) (*.f64 y-scale y-scale)) (/.f64 (*.f64 y-scale (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale))) (*.f64 y-scale y-scale)))
(-.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 #s(literal 4 binary64) (neg.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (neg.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)) (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale)) (/.f64 #s(literal 1 binary64) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 #s(literal 1 binary64) y-scale) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (exp.f64 (log.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))) (exp.f64 (log.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) #s(literal -1 binary64)) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 #s(literal -1 binary64) y-scale) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal 4 binary64) y-scale) (/.f64 (neg.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale))) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) y-scale) (/.f64 #s(literal -4 binary64) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) #s(literal -1 binary64)) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 #s(literal -4 binary64) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 #s(literal -4 binary64) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 #s(literal -4 binary64) (neg.f64 y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -1 binary64)) (/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale)) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal 4 binary64) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (neg.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale))) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal 4 binary64) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (neg.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale))) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal 4 binary64) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 (neg.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale))) (neg.f64 y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal 2 binary64) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (/.f64 #s(literal 1 binary64) x-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 #s(literal 1 binary64) x-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 y-scale #s(literal 1 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) y-scale) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) y-scale) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) y-scale) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) y-scale) (/.f64 (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) #s(literal 2 binary64)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) y-scale) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 #s(literal 1 binary64) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (neg.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale))) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 #s(literal 4 binary64) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (neg.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale))) y-scale) (/.f64 #s(literal 4 binary64) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -4 binary64) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -4 binary64) y-scale) (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -1 binary64) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -1 binary64) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (neg.f64 y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -4 binary64) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -4 binary64) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (neg.f64 y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (neg.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 #s(literal 4 binary64) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (neg.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale))) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 #s(literal 4 binary64) (neg.f64 y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) #s(literal -1 binary64)) (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) #s(literal -1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) y-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 #s(literal 1 binary64) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))
(/.f64 (/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) y-scale) y-scale)
(/.f64 (-.f64 (*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) y-scale) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (*.f64 y-scale (*.f64 y-scale y-scale)))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale) (*.f64 y-scale (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (*.f64 y-scale y-scale))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale))) (*.f64 x-scale y-scale))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale))) (*.f64 x-scale y-scale))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 y-scale y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale))) (*.f64 x-scale y-scale))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale))) (*.f64 x-scale y-scale))
(/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)))) (neg.f64 y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale))) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)))) (neg.f64 y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)))) (neg.f64 y-scale))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (neg.f64 y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale))) (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (neg.f64 y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (neg.f64 y-scale))
(/.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) y-scale)) (neg.f64 y-scale))
(/.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) y-scale) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale))))) (neg.f64 (*.f64 y-scale (*.f64 y-scale y-scale))))
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale) (*.f64 y-scale (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale))))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64))) (fma.f64 #s(literal 16 binary64) (pow.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))))
(*.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #s(literal 1 binary64)))
(cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
(pow.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #s(literal 1 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #s(literal 1 binary64)))
(sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
(pow.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #s(literal 1 binary64))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (neg.f64 (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))))
(/.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) y-scale)
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 y-scale (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale)) (*.f64 (*.f64 y-scale y-scale) x-scale))
(/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale)) (*.f64 (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale))
(/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale)) (*.f64 (neg.f64 y-scale) x-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale)) x-scale)
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale))) x-scale)
(/.f64 (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale))) (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale))) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (neg.f64 (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #s(literal 1 binary64))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)))) (neg.f64 (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (neg.f64 (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale))) (neg.f64 (*.f64 (*.f64 y-scale y-scale) x-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale))) (neg.f64 (*.f64 (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale))) (neg.f64 (*.f64 (neg.f64 y-scale) x-scale)))
(/.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 (neg.f64 y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)))) (neg.f64 (neg.f64 y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale))) (neg.f64 x-scale))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale)))) (neg.f64 x-scale))
(/.f64 (neg.f64 (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (neg.f64 (neg.f64 y-scale)))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale))) #s(literal -1 binary64))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale))))
(*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) y-scale))
(*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 4 binary64))
(*.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale)) #s(literal 4 binary64)) (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 #s(literal 4 binary64) y-scale) (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) y-scale) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) y-scale) (/.f64 #s(literal 4 binary64) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) y-scale) (/.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) x-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) (neg.f64 y-scale)))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 #s(literal 4 binary64) y-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (neg.f64 y-scale)))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) x-scale) (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) y-scale))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 #s(literal 4 binary64) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 #s(literal 4 binary64) (neg.f64 y-scale)))
(*.f64 (/.f64 #s(literal 4 binary64) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) y-scale))
(*.f64 (/.f64 #s(literal 4 binary64) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(*.f64 (/.f64 #s(literal 4 binary64) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (neg.f64 y-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (neg.f64 y-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)) #s(literal -1 binary64)) (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) y-scale))

eval182.0ms (0.5%)

Memory
53.9MiB live, 519.6MiB allocated
Compiler

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

prune223.0ms (0.6%)

Memory
-21.4MiB live, 696.7MiB allocated
Pruning

28 alts after pruning (28 fresh and 0 done)

PrunedKeptTotal
New1 078281 106
Fresh000
Picked101
Done000
Total1 079281 107
Accuracy
67.8%
Counts
1 107 → 28
Alt Table
Click to see full alt table
StatusAccuracyProgram
16.2%
(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)))))
20.0%
(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)))
20.0%
(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 #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)))
23.4%
(/.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)
21.8%
(/.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))
23.6%
(/.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))
24.0%
(/.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))
22.4%
(/.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))
20.7%
(-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
21.4%
(-.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)))
18.9%
(-.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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
18.9%
(-.f64 (/.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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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.7%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
21.5%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 b)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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.7%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #s(approx (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
16.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)) #s(approx (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
28.0%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(approx (cos (* (/ angle 180) (PI))) #s(literal 1 binary64))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
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 (exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 b))) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (exp.f64 (*.f64 (log.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) #s(literal -1 binary64)))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
26.7%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #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)))
36.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) #s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
21.0%
(-.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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.5%
(-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
21.5%
(-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
55.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 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
18.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) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 b (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)))
45.5%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.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 5 494 to 2 348 computations (57.3% saved)

simplify203.0ms (0.6%)

Memory
-8.1MiB live, 465.7MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
#s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
cost-diff128
(-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
cost-diff384
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)
cost-diff384
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)
cost-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-diff384
(/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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)
cost-diff128
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
cost-diff320
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
cost-diff384
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale)
cost-diff1280
(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)))))
cost-diff128
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
cost-diff128
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
cost-diff128
(-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale))))
cost-diff320
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
cost-diff0
(*.f64 #s(literal -4 binary64) (*.f64 b b))
cost-diff0
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a))
cost-diff0
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
cost-diff0
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
Rules
8 580×lower-*.f32
8 504×lower-*.f64
4 306×lower-fma.f32
4 300×lower-fma.f64
2 456×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01272652
02162645
14252483
214852477
375912477
080872417
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
#s(literal -4 binary64)
(*.f64 b b)
b
(*.f64 a a)
a
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
x-scale
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale y-scale)
y-scale
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale))))
(pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale)
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))
(*.f64 (+.f64 b a) (-.f64 b a))
(+.f64 b a)
b
a
(-.f64 b a)
(sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
#s(literal 2 binary64)
(*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))
(*.f64 angle #s(literal 1/180 binary64))
angle
#s(literal 1/180 binary64)
(PI.f64)
x-scale
(*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))
(fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
(*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 a a)
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale))
(*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))
#s(literal 4 binary64)
(fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 x-scale x-scale)
(*.f64 y-scale y-scale)
y-scale
(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)))))
(/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.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)
(pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 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)
y-scale
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale)
(/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))
#s(literal 1 binary64)
(*.f64 x-scale 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))))
#s(literal -4 binary64)
(/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.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)
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(*.f64 y-scale y-scale)
(-.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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (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 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
#s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
#s(literal 4 binary64)
(/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 b #s(literal 4 binary64))
b
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
angle
(PI.f64)
#s(literal 2 binary64)
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
x-scale
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale y-scale)
y-scale
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))
(*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
a
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
(/.f64 angle #s(literal 180 binary64))
#s(literal 180 binary64)
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
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 #s(literal -4 binary64) (*.f64 b (*.f64 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 (*.f64 b (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a))
(*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 b (*.f64 a a))))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
#s(literal -4 binary64)
(*.f64 b b)
b
(*.f64 a a)
a
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
x-scale
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale y-scale)
y-scale
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/.f64 (fma.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)))) (/.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))) (pow.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64))) (*.f64 y-scale y-scale))
(-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale))))
(fma.f64 #s(literal -4 binary64) (*.f64 (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 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))) (pow.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64)))
(pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64))
(pow.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale)
(*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale))
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))
(*.f64 (+.f64 b a) (-.f64 b a))
(+.f64 b a)
b
a
(-.f64 b a)
(sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
(sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
(*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))
#s(literal 2 binary64)
(*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))
(*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))
(*.f64 angle #s(literal 1/180 binary64))
angle
#s(literal 1/180 binary64)
(PI.f64)
x-scale
(*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))
(*.f64 (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 (*.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 x-scale x-scale)))
(fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(fma.f64 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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 b (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
(fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
(cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))
(*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))
(*.f64 a a)
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale))
(/.f64 (*.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 x-scale x-scale))
(*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))
(*.f64 #s(literal 4 binary64) (fma.f64 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 4 binary64)
(fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.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 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))
(*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 a (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 x-scale x-scale)
(*.f64 y-scale y-scale)
y-scale
(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)))))
(/.f64 (fma.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)))) (/.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))) (pow.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64))) (*.f64 y-scale y-scale))
(/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.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 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) 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))
(pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) #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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))
(*.f64 (+.f64 b a) (-.f64 b a))
(+.f64 b a)
b
a
(-.f64 b a)
(sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
(sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
(*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))
#s(literal 2 binary64)
(*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))
(*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))
(*.f64 angle #s(literal 1/180 binary64))
angle
#s(literal 1/180 binary64)
(PI.f64)
y-scale
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale)
(/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))
#s(literal 1 binary64)
(*.f64 x-scale 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))))
(/.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)))) (*.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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
#s(literal -4 binary64)
(/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(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 (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 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 (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(*.f64 (fma.f64 b (*.f64 b (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 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)))))
(fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.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 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
(cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))
(*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 a (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
(fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.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))))
(*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 b (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))
(*.f64 a a)
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(*.f64 y-scale y-scale)
(-.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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
(fma.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-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))) y-scale)
(/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 angle (*.f64 (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 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) #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))
(pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) #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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))
(*.f64 (+.f64 b a) (-.f64 b a))
(+.f64 b a)
b
a
(-.f64 b a)
(sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
(sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
(*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))
#s(literal 2 binary64)
(*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))
(*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))
(*.f64 angle #s(literal 1/180 binary64))
angle
#s(literal 1/180 binary64)
(PI.f64)
(*.f64 x-scale (*.f64 x-scale y-scale))
x-scale
(*.f64 x-scale y-scale)
y-scale
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))
(/.f64 (*.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 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))))) (*.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 #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 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 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
(fma.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
#s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
#s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
#s(literal 4 binary64)
(/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 b #s(literal 4 binary64))
b
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))
(pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))
(*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
angle
(PI.f64)
#s(literal 2 binary64)
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))
(pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
x-scale
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale y-scale)
y-scale
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))
(/.f64 (*.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))
(*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))
(*.f64 #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 x-scale x-scale)))
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) x-scale)
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)))
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))
(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))))
a
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
(/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))
(/.f64 angle #s(literal 180 binary64))
#s(literal 180 binary64)
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))
(*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))))
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) y-scale)
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)))
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))
(*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))))
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))))

localize1.1s (3.1%)

Memory
46.2MiB live, 2 741.2MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy26.122135504472443
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
accuracy26.20114995304946
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
accuracy26.201149953049477
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
accuracy37.53711735663178
(-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
accuracy26.12213550447241
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
accuracy26.201149953049477
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
accuracy26.25826015384024
(sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
accuracy37.53711735663178
(-.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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
accuracy16.15088136322414
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
accuracy26.25826015384024
(sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
accuracy26.30741243332519
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
accuracy45.49269800730678
(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)))))
accuracy16.15088136322414
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
accuracy26.25826015384024
(sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
accuracy26.30741243332519
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
accuracy41.05220491186152
(-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (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))))
accuracy3.147870672483379
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
accuracy7.783079752664676
(*.f64 x-scale (*.f64 y-scale y-scale))
accuracy12.969920316558113
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
accuracy14.486544051378631
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a))
Samples
455.0ms178×1valid
280.0ms65×2valid
18.0ms3valid
7.0ms1exit
6.0ms2exit
1.0ms0valid
Compiler

Compiled 2 593 to 108 computations (95.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 631.0ms
ival-mult: 156.0ms (24.7% of total)
ival-sin: 127.0ms (20.1% of total)
ival-cos: 115.0ms (18.2% of total)
ival-div: 61.0ms (9.7% of total)
ival-pow2: 53.0ms (8.4% of total)
adjust: 47.0ms (7.4% of total)
ival-sub: 26.0ms (4.1% of total)
const: 22.0ms (3.5% of total)
ival-add: 17.0ms (2.7% of total)
ival-pow: 3.0ms (0.5% of total)
ival-pi: 2.0ms (0.3% of total)
exact: 1.0ms (0.2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series304.0ms (0.9%)

Memory
17.7MiB live, 523.2MiB allocated
Counts
24 → 768
Calls
Call 1
Inputs
#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #<representation binary64>) () ())
#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<representation binary64>) () ())
#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<representation binary64>) () ())
#s(alt (fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.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))))) (patch (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))))) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) (patch (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())
#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())
#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())
#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())
#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())
#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())
#s(alt (-.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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())
#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())
#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())
Outputs
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor 0 b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor 0 b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor 0 b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor 0 b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor -inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor -inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor -inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor -inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)))) (taylor 0 b) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow x-scale 2)) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)))) (taylor 0 b) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* b (+ (* b (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2)))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)))) (taylor 0 b) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* b (+ (* b (- (+ (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow x-scale 2)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2)))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)))) (taylor 0 b) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor inf b) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor inf b) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow b 2)))))) (taylor inf b) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow b 2)))))) (taylor inf b) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor -inf b) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor -inf b) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* -1 (/ (+ (* -1 (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow x-scale 2))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor -inf b) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow x-scale 2))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor -inf b) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)))) (taylor 0 a) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow x-scale 2)) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)))) (taylor 0 a) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* a (+ (* a (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)))) (taylor 0 a) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* a (+ (* a (- (+ (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow x-scale 2)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)))) (taylor 0 a) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor inf a) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor inf a) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow a 2)))))) (taylor inf a) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow a 2)))))) (taylor inf a) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor -inf a) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor -inf a) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -1 (/ (+ (* -1 (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow x-scale 2))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor -inf a) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow x-scale 2))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor -inf a) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor 0 angle) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))) (taylor 0 angle) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow angle 2) (- (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 2)))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))) (taylor 0 angle) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow angle 2) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow angle 2) (- (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 2)) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (pow x-scale 2))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 2)))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))) (taylor 0 angle) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (taylor inf angle) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (taylor inf angle) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (taylor inf angle) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (taylor inf angle) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (taylor -inf angle) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (taylor -inf angle) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (taylor -inf angle) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))) (taylor -inf angle) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* 1/32400 (* (pow angle 2) (pow (PI) 2))) (taylor 0 angle) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (- (* -1/3149280000 (* (pow angle 2) (pow (PI) 4))) (* -1/32400 (pow (PI) 2)))) (taylor 0 angle) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (- (* (pow angle 2) (- (* 1/765275040000000 (* (pow angle 2) (pow (PI) 6))) (* 1/3149280000 (pow (PI) 4)))) (* -1/32400 (pow (PI) 2)))) (taylor 0 angle) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (- (* (pow angle 2) (- (* (pow angle 2) (- (* -1/347128758144000000000 (* (pow angle 2) (pow (PI) 8))) (* -1/765275040000000 (pow (PI) 6)))) (* 1/3149280000 (pow (PI) 4)))) (* -1/32400 (pow (PI) 2)))) (taylor 0 angle) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor inf angle) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor inf angle) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor inf angle) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor inf angle) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor -inf angle) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor -inf angle) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor -inf angle) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor -inf angle) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/32400 (* (pow angle 2) (pow (PI) 2)))) (taylor 0 angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* 1/3149280000 (* (pow angle 2) (pow (PI) 4)))))) (taylor 0 angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/765275040000000 (* (pow angle 2) (pow (PI) 6))) (* 1/3149280000 (pow (PI) 4))))))) (taylor 0 angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor inf angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor inf angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor inf angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor inf angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor -inf angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor -inf angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor -inf angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor -inf angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 b) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* b (+ (* b (+ (* -4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 b) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* b (+ (* b (+ (* -4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 b) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf b) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor inf b) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor inf b) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))))) (taylor inf b) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf b) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf b) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2)))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf b) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2))))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2)))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf b) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 a) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* a (+ (* a (+ (* -4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 a) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* a (+ (* a (+ (* -4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 a) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf a) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor inf a) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor inf a) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))))) (taylor inf a) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf a) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf a) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2)))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf a) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2)))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf a) (#s(alt (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))))) (patch (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))))) #<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 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.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))))) (patch (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))))) #<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))))) (* 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 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.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))))) (patch (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))))) #<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))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* -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 (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))))) (patch (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))))) #<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))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) (pow y-scale 2))))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (taylor 0 angle) (#s(alt (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))))) (patch (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))))) #<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 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)))) (taylor inf angle) (#s(alt (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))))) (patch (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))))) #<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 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)))) (taylor inf angle) (#s(alt (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))))) (patch (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))))) #<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 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)))) (taylor inf angle) (#s(alt (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))))) (patch (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))))) #<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 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)))) (taylor inf angle) (#s(alt (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))))) (patch (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))))) #<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 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)))) (taylor -inf angle) (#s(alt (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))))) (patch (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))))) #<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 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)))) (taylor -inf angle) (#s(alt (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))))) (patch (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))))) #<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 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)))) (taylor -inf angle) (#s(alt (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))))) (patch (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))))) #<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 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)))) (taylor -inf angle) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (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))))) (patch (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))))) #<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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (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 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.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))))) (patch (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))))) #<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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (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 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.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))))) (patch (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))))) #<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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (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 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.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))))) (patch (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))))) #<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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (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 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.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))))) (patch (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))))) #<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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (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 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.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))))) (patch (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))))) #<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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (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 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.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))))) (patch (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))))) #<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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (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 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.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))))) (patch (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))))) #<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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (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 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.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))))) (patch (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))))) #<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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (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 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.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))))) (patch (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))))) #<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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (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 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.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))))) (patch (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))))) #<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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (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 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.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))))) (patch (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))))) #<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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (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 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow x-scale 2) y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) (patch (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow x-scale 2) y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) (patch (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow x-scale 2) y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) (patch (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow x-scale 2) y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) (patch (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow x-scale 2) y-scale)) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) (patch (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow x-scale 2) y-scale)) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) (patch (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow x-scale 2) y-scale)) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) (patch (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow x-scale 2) y-scale)) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) (patch (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow x-scale 2) y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) (patch (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow x-scale 2) y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) (patch (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow x-scale 2) y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) (patch (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow x-scale 2) y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) (patch (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow x-scale 2) y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) (patch (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow x-scale 2) y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) (patch (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow x-scale 2) y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) (patch (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow x-scale 2) y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) (patch (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow x-scale 2) y-scale)) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) (patch (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow x-scale 2) y-scale)) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) (patch (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow x-scale 2) y-scale)) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) (patch (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow x-scale 2) y-scale)) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) (patch (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow x-scale 2) y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) (patch (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow x-scale 2) y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) (patch (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow x-scale 2) y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) (patch (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow x-scale 2) y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) (patch (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-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))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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)))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))))) (taylor inf b) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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)))))) (taylor inf b) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))))))) (taylor inf b) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2)))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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)))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2)))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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)))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))))) (taylor inf a) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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)))))) (taylor inf a) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))))))) (taylor inf a) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2)))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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)))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2)))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<representation binary64>) () ())) ())
#s(alt (* 1/8100 (/ (* (pow angle 2) (* (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 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -1/196830000 (/ (* (pow angle 2) (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))))))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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 angle 2) (* (pow (+ a b) 2) (* (+ (* -1/1549681956000000000 (pow (PI) 8)) (* -1/10847773692000000000 (pow (PI) 8))) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))))))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor inf angle) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor inf angle) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor inf angle) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor inf angle) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<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))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) (patch (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (taylor 0 a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (taylor inf a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (taylor inf a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (taylor inf a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (taylor inf a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (taylor -inf a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow b 2) (pow x-scale 2)) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (pow b 2) (pow x-scale 2))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (/ (pow b 2) (pow x-scale 2))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (/ (pow b 2) (pow x-scale 2))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (taylor inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (taylor inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (taylor inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (taylor inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (taylor 0 b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (taylor inf b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (taylor inf b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (taylor inf b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (taylor inf b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (taylor -inf b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (taylor 0 a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (taylor inf a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (taylor -inf a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow y-scale 2)) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow a 2) (pow y-scale 2))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (/ (pow a 2) (pow y-scale 2))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))))) (/ (pow a 2) (pow y-scale 2))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (taylor 0 b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (taylor inf b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (taylor -inf b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) (patch (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 b) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor inf b) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf b) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 a) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor inf a) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf a) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (* (pow angle 2) (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))) (taylor 0 angle) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))) (taylor 0 angle) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (taylor 0 angle) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2)))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4)))))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4))))))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* -1/4374000 (* (pow angle 2) (pow (PI) 3))) (* 1/90 (PI)))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* 1/708588000000 (* (pow angle 2) (pow (PI) 5))))))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/241061637600000000 (* (pow angle 2) (pow (PI) 7))) (* 1/708588000000 (pow (PI) 5)))))))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (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 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 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 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2)))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4)))))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4))))))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/180 (* angle (PI))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI)))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5))))))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5)))))))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 angle) (#s(alt (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2)))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4)))))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4))))))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/180 (* angle (PI))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI)))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5))))))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5)))))))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
Calls

192 calls:

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

simplify453.0ms (1.3%)

Memory
25.1MiB live, 972.3MiB allocated
Algorithm
egg-herbie
Rules
7 128×lower-fma.f64
7 128×lower-fma.f32
6 572×lower-+.f64
6 572×lower-+.f32
6 528×lower-*.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0117841024
1422339158
0854237991
Stop Event
iter limit
node limit
Counts
768 → 768
Calls
Call 1
Inputs
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(- (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(- (+ (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow x-scale 2)) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(- (+ (* b (+ (* b (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2)))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(- (+ (* b (+ (* b (- (+ (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow x-scale 2)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2)))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(* (pow b 4) (- (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(* (pow b 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(* (pow b 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow b 2))))))
(* (pow b 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow b 2))))))
(* (pow b 4) (- (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(* (pow b 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(* (pow b 4) (- (+ (* -1 (/ (+ (* -1 (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow x-scale 2))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(* (pow b 4) (- (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow x-scale 2))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(- (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(- (+ (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow x-scale 2)) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(- (+ (* a (+ (* a (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(- (+ (* a (+ (* a (- (+ (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow x-scale 2)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(* (pow a 4) (- (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(* (pow a 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(* (pow a 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow a 2))))))
(* (pow a 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow a 2))))))
(* (pow a 4) (- (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(* (pow a 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(* (pow a 4) (- (+ (* -1 (/ (+ (* -1 (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow x-scale 2))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(* (pow a 4) (- (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow x-scale 2))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow angle 2) (- (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 2)))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow angle 2) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow angle 2) (- (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 2)) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (pow x-scale 2))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 2)))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))))
(- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))))
(- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))))
(- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))))
(- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))))
(- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))))
(- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))))
(- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))))
(- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2))
(* 1/32400 (* (pow angle 2) (pow (PI) 2)))
(* (pow angle 2) (- (* -1/3149280000 (* (pow angle 2) (pow (PI) 4))) (* -1/32400 (pow (PI) 2))))
(* (pow angle 2) (- (* (pow angle 2) (- (* 1/765275040000000 (* (pow angle 2) (pow (PI) 6))) (* 1/3149280000 (pow (PI) 4)))) (* -1/32400 (pow (PI) 2))))
(* (pow angle 2) (- (* (pow angle 2) (- (* (pow angle 2) (- (* -1/347128758144000000000 (* (pow angle 2) (pow (PI) 8))) (* -1/765275040000000 (pow (PI) 6)))) (* 1/3149280000 (pow (PI) 4)))) (* -1/32400 (pow (PI) 2))))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
1
(+ 1 (* -1/32400 (* (pow angle 2) (pow (PI) 2))))
(+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* 1/3149280000 (* (pow angle 2) (pow (PI) 4))))))
(+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/765275040000000 (* (pow angle 2) (pow (PI) 6))) (* 1/3149280000 (pow (PI) 4)))))))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* b (+ (* b (+ (* -4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* b (+ (* b (+ (* -4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2)))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2))))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2)))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* a (+ (* a (+ (* -4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* a (+ (* a (+ (* -4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2)))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2)))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))))))))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) (pow y-scale 2))))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
(+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow 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) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow 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) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow 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) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow 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) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (pow x-scale 2))
(/ 1 (* (pow x-scale 2) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/ (* (pow a 4) (pow (sin (* 1/90 (* 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))))
(+ (* 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))) (/ (* (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))))
(+ (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/ (* (pow b 4) (pow (sin (* 1/90 (* 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)))))
(* (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))))))
(* (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)))))))
(/ (* (pow b 4) (pow (sin (* 1/90 (* 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)))))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2)))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))
(* (pow b 4) (+ (* -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)))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2)))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))
(/ (* (pow b 4) (pow (sin (* 1/90 (* 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))))
(+ (* 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))) (/ (* (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))))
(+ (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/ (* (pow a 4) (pow (sin (* 1/90 (* 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)))))
(* (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))))))
(* (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)))))))
(/ (* (pow a 4) (pow (sin (* 1/90 (* 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)))))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2)))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))
(* (pow a 4) (+ (* -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)))) 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)))))
(* 1/8100 (/ (* (pow angle 2) (* (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 angle 2) (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 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 (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)))))))
(* (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 angle 2) (* (pow (+ a b) 2) (* (+ (* -1/1549681956000000000 (pow (PI) 8)) (* -1/10847773692000000000 (pow (PI) 8))) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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)))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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)))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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)))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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)))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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)))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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)))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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)))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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)))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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)))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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)))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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)))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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)))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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)))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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)))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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)))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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)))
(/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(/ (pow b 2) (pow x-scale 2))
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (pow b 2) (pow x-scale 2)))
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (/ (pow b 2) (pow x-scale 2)))
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (/ (pow b 2) (pow x-scale 2)))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))
(+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))
(+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))
(+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))
(/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))
(* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))
(* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(/ (pow a 2) (pow y-scale 2))
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow a 2) (pow y-scale 2)))
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (/ (pow a 2) (pow y-scale 2)))
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))))) (/ (pow a 2) (pow y-scale 2)))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))
(+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))
(+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))
(+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))
(/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))
(* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))
(* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))
(+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))
(+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (* (pow angle 2) (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))
(* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))))
(* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
1
(+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4))))))
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4)))))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(* 1/90 (* angle (PI)))
(* angle (+ (* -1/4374000 (* (pow angle 2) (pow (PI) 3))) (* 1/90 (PI))))
(* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* 1/708588000000 (* (pow angle 2) (pow (PI) 5)))))))
(* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/241061637600000000 (* (pow angle 2) (pow (PI) 7))) (* 1/708588000000 (pow (PI) 5))))))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(- (/ (* (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))
1
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(* 1/180 (* angle (PI)))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
1
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(* 1/180 (* angle (PI)))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (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 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/787320000 binary64)) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (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 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/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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 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 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* 1/90 (* angle (PI)))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(* 1/90 (* angle (PI)))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(* 1/90 (* angle (PI)))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(* 1/90 (* angle (PI)))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(* 1/90 (* angle (PI)))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(* 1/90 (* angle (PI)))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(* 1/90 (* angle (PI)))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(* 1/90 (* angle (PI)))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(* 1/90 (* angle (PI)))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(* 1/90 (* angle (PI)))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(* 1/90 (* angle (PI)))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(* 1/90 (* angle (PI)))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(- (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 x-scale x-scale))))
(- (+ (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow x-scale 2)) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(fma.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 x-scale x-scale)))))
(- (+ (* b (+ (* b (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2)))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(fma.f64 b (fma.f64 b (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 x-scale x-scale)))))
(- (+ (* b (+ (* b (- (+ (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow x-scale 2)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2)))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(fma.f64 b (fma.f64 b (fma.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 x-scale x-scale)))))
(* (pow b 4) (- (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale)))))
(* (pow b 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 b (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale)))))
(* (pow b 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 #s(literal 0 binary64) (*.f64 b (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 b b))))))
(* (pow b 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 #s(literal 0 binary64) (*.f64 b (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 b (*.f64 b b)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 b b))))))
(* (pow b 4) (- (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale)))))
(* (pow b 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 #s(literal 0 binary64) (*.f64 b (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale)))))
(* (pow b 4) (- (+ (* -1 (/ (+ (* -1 (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow x-scale 2))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) b)) b)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale)))))
(* (pow b 4) (- (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow x-scale 2))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 #s(literal 0 binary64) (*.f64 b (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (neg.f64 b))) b)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale)))))
(- (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale))))
(- (+ (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow x-scale 2)) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(fma.f64 a (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)))))
(- (+ (* a (+ (* a (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(fma.f64 a (fma.f64 a (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)))))
(- (+ (* a (+ (* a (- (+ (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow x-scale 2)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(fma.f64 a (fma.f64 a (fma.f64 a (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)))))
(* (pow a 4) (- (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale)))))
(* (pow a 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale)))))
(* (pow a 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 a a))))))
(* (pow a 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 x-scale x-scale))) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 a a))))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 a a))))))
(* (pow a 4) (- (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale)))))
(* (pow a 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 x-scale x-scale))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale)))))
(* (pow a 4) (- (+ (* -1 (/ (+ (* -1 (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow x-scale 2))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) a)) a)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale)))))
(* (pow a 4) (- (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow x-scale 2))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (neg.f64 a))) a)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow angle 2) (- (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 2)))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 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 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 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b))))) (*.f64 x-scale x-scale)))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow angle 2) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow angle 2) (- (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 2)) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (pow x-scale 2))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 2)))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (/.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/11957422500000 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 a a) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 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 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 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 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 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b))))) (*.f64 x-scale x-scale)))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)))
(- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))))
(/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))))
(/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))))
(/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))))
(/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))))
(/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))))
(/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))))
(/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))))
(/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(* 1/32400 (* (pow angle 2) (pow (PI) 2)))
(*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)))
(* (pow angle 2) (- (* -1/3149280000 (* (pow angle 2) (pow (PI) 4))) (* -1/32400 (pow (PI) 2))))
(*.f64 (*.f64 angle angle) (fma.f64 (*.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
#s(literal 1 binary64)
(+ 1 (* -1/32400 (* (pow angle 2) (pow (PI) 2))))
(fma.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)) #s(literal 1 binary64))
(+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* 1/3149280000 (* (pow angle 2) (pow (PI) 4))))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/32400 binary64) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 1 binary64))
(+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/765275040000000 (* (pow angle 2) (pow (PI) 6))) (* 1/3149280000 (pow (PI) 4)))))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/32400 binary64))) #s(literal 1 binary64))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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) (*.f64 y-scale y-scale))))
(+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* b (+ (* b (+ (* -4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (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)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.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) (*.f64 y-scale y-scale)))))
(+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* b (+ (* b (+ (* -4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (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)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.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) (*.f64 y-scale y-scale)))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 b b))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 b b))) (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)))) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 b (*.f64 b b)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2)))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) b)) b))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2))))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2)))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))))) b)) b))))
(+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 a (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* a (+ (* a (+ (* -4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (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)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* a (+ (* a (+ (* -4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (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)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 a (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 a a))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 a a))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 a (*.f64 a a))))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (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)))))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2)))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) a)) a))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2)))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))))) a)) a))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* -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 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 a a) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.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/196830000 binary64))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) (pow y-scale 2))))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 a a) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 a a) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (*.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)))) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.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/196830000 binary64)))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow 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))))
(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) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.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 a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(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) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.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 a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(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) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.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 a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(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) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.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 a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(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) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.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 a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(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) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.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 a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(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) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.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 a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(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) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.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 a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 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 (/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale)) (*.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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (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 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 y-scale 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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (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 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 y-scale 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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (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 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 y-scale 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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (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 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 y-scale 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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (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 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 y-scale 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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (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 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 y-scale 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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (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 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 y-scale 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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (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 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 y-scale 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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (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 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 y-scale 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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (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 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 y-scale 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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (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 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 y-scale 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 y-scale 2))) (/ (* (pow (sin (* 1/90 (* angle (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 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ 1 (* (pow x-scale 2) y-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/.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) (*.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))))
(fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(+ (* 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))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))
(fma.f64 b (fma.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.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) (*.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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))
(fma.f64 b (fma.f64 b (fma.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.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) (*.f64 y-scale y-scale))))
(/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* (pow b 4) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow b 4) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow b 4) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (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)))) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 b (*.f64 b b)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* (pow b 4) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))))))
(* (pow b 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2)))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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 (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 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))))) b)))
(* (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)))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2)))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))))) b)) b)))
(/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 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))))
(fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 a (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(+ (* 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))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))
(fma.f64 a (fma.f64 a (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))
(fma.f64 a (fma.f64 a (fma.f64 a (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 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)))
(/.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) (*.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)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow a 4) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow a 4) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 a (*.f64 a a))))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))
(/.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) (*.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)))))
(*.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 (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))))))
(* (pow a 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2)))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.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 (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 (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))))) a)))
(* (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)))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2)))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.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 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))))) a)) a)))
(* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 angle (PI.f64)) (*.f64 angle (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/196830000 (/ (* (pow angle 2) (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 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 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 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)))))))
(*.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (/.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))) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.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/196830000 binary64))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.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 angle 2) (* (pow (+ a b) 2) (* (+ (* -1/1549681956000000000 (pow (PI) 8)) (* -1/10847773692000000000 (pow (PI) 8))) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))))
(*.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (/.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) #s(literal -1/1355971711500000000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 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)))) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.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/196830000 binary64))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.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)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))
(*.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))))
(/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))
(/ (pow b 2) (pow x-scale 2))
(/.f64 (*.f64 b b) (*.f64 x-scale x-scale))
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (pow b 2) (pow x-scale 2)))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (/ (pow b 2) (pow x-scale 2)))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (/ (pow b 2) (pow x-scale 2)))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (/ (pow a 2) (pow y-scale 2)))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))))) (/ (pow a 2) (pow y-scale 2)))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (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 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/787320000 binary64)) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (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 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/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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 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 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 b b) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 b b) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.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 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 angle (PI.f64)) (*.f64 angle (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 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.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/787320000 binary64)) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.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 (pow.f64 (PI.f64) #s(literal 6 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.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/787320000 binary64)))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.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 (pow.f64 (PI.f64) #s(literal 6 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.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/787320000 binary64)))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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
#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 (*.f64 angle angle) (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))
(+ 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 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 6 binary64))) #s(literal -1/382637520000000 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/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 #s(literal 1/708588000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 #s(literal -1/4374000 binary64) (*.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)) (* (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 (*.f64 #s(literal -1/241061637600000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 #s(literal 1/708588000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.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 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)))
(- (/ (* (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 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 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 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 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 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.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)))) (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 (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (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)) (/.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (-.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 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) b)) b)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 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 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 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 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) a)) a)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) a)) a)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-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 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 angle angle) (fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.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/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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 angle angle) (fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.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/196830000 binary64) (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 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 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 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 a a) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (/ (* (pow (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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
1
#s(literal 1 binary64)
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(fma.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)) #s(literal 1 binary64))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/64800 binary64) (*.f64 (*.f64 #s(literal 1/25194240000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(* 1/180 (* angle (PI)))
(*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(*.f64 angle (fma.f64 (*.f64 (*.f64 angle angle) (*.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 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 angle angle)) (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 #s(literal 1/180 binary64) (PI.f64) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 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))))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) 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 (PI.f64) (PI.f64)) #s(literal -1/64800 binary64) (*.f64 (*.f64 #s(literal 1/25194240000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 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 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(* 1/180 (* angle (PI)))
(*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(*.f64 angle (fma.f64 (*.f64 (*.f64 angle angle) (*.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 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 angle angle)) (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 #s(literal 1/180 binary64) (PI.f64) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 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))))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))

rewrite319.0ms (0.9%)

Memory
-6.3MiB live, 741.6MiB allocated
Rules
4 524×lower-*.f32
4 450×lower-*.f64
3 366×lower-fma.f32
3 360×lower-fma.f64
3 036×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0126827
0214732
1779613
26836613
08041608
Stop Event
iter limit
node limit
iter limit
Counts
24 → 610
Calls
Call 1
Inputs
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
(-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.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)))))
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale 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))) y-scale)
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)
(-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
#s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
(sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
(-.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 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
Outputs
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(neg.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (*.f64 a a))) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (*.f64 a a))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (*.f64 a a))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (*.f64 a a)))))))
(/.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 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 a a))))) (neg.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale))) (neg.f64 (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (*.f64 a a))) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale y-scale)))) x-scale)
(/.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (*.f64 a a))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(/.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale)
(/.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (*.f64 a a))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (*.f64 a a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(/.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) x-scale) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale)
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 x-scale y-scale)) y-scale)
(pow.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (*.f64 a a))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (*.f64 a a))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale))) #s(literal -1 binary64))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (*.f64 (*.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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 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 (*.f64 b b) #s(literal -4 binary64)) 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 (*.f64 b b) #s(literal -4 binary64)) x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (*.f64 a a))))
(*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (/.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 (*.f64 b b) #s(literal -4 binary64)) (/.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 (*.f64 b b) #s(literal -4 binary64)))
(*.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 y-scale y-scale)) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 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 #s(literal -4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) y-scale))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 a a) x-scale))
(*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) y-scale))
(*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 y-scale y-scale)) (/.f64 a (*.f64 x-scale x-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale x-scale)) (/.f64 a (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 a y-scale))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(*.f64 a (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)))
(*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 b (*.f64 a a))))
(*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 a a))
(*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(*.f64 (*.f64 b (*.f64 b (*.f64 a a))) #s(literal -4 binary64))
(*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) 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 (*.f64 b b) #s(literal -4 binary64))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(*.f64 (*.f64 b #s(literal -4 binary64)) b)
(/.f64 (*.f64 #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 #s(literal 1/180 binary64) (PI.f64)) #s(literal 2 binary64)))
(*.f64 #s(literal 1/180 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)))
(*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))
(*.f64 (*.f64 angle #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 #s(literal 1/180 binary64) (PI.f64)))
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))
(*.f64 (*.f64 #s(literal 2 binary64) (PI.f64)) (*.f64 angle #s(literal 1/180 binary64)))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (PI.f64))) #s(literal 1/180 binary64))
(*.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) #s(literal 1 binary64)) (PI.f64))
(*.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(+.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)) (*.f64 (fma.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 a a) (fma.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 -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)))))
(+.f64 (*.f64 (fma.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 a a) (fma.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 -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.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 a a) (fma.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 4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 6 binary64)) (fma.f64 (/.f64 (*.f64 (fma.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 a a) (fma.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 4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale))) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 4 binary64)))) (/.f64 (pow.f64 (/.f64 (*.f64 (fma.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 a a) (fma.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 4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) #s(literal 3 binary64)) (fma.f64 (/.f64 (*.f64 (fma.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 a a) (fma.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 4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale))) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 4 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (/.f64 (*.f64 (fma.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 a a) (fma.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 4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)))))
(fma.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale))) (*.f64 (fma.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 a a) (fma.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 -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)))))
(fma.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 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale))) (*.f64 (fma.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 a a) (fma.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 -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (*.f64 (fma.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 a a) (fma.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 -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)))))
(fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 (fma.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 a a) (fma.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 -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)))))
(fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale))) (*.f64 (fma.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 a a) (fma.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 -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)))))
(fma.f64 (fma.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 a a) (fma.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 -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)))
(fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 (fma.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 a a) (fma.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 -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)))))
(fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (pow.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 2 binary64)) (*.f64 (fma.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 a a) (fma.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 -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 (fma.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 a a) (fma.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 -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (neg.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)))
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.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 4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)))
(fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 (*.f64 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 a a) (fma.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 -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)))))
(fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) x-scale)) (*.f64 (fma.f64 (*.f64 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 a a) (fma.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 -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)))))
(fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 (fma.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 a a) (fma.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 -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)))))
(fma.f64 (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale))) (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)))
(fma.f64 (neg.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)))
(fma.f64 (exp.f64 (log.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)))) (exp.f64 (log.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)))) (*.f64 (fma.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 a a) (fma.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 -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)))))
(fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 (fma.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 a a) (fma.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 -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (/.f64 #s(literal 1 binary64) x-scale) (*.f64 (fma.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 a a) (fma.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 -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)))))
(fma.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 #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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (fma.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 a a) (fma.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 -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (*.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)))) x-scale) (*.f64 (fma.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 a a) (fma.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 -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)))))
(fma.f64 (*.f64 (neg.f64 (fma.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 a a) (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 4 binary64)) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)))
(fma.f64 (*.f64 (neg.f64 (fma.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 a a) (fma.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 4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)))
(fma.f64 (*.f64 (neg.f64 (fma.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 a a) (fma.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 4 binary64) x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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)))) x-scale) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)))
(fma.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) x-scale) (*.f64 (fma.f64 (*.f64 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 a a) (fma.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 -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 (*.f64 (fma.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 a a) (fma.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 4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale))) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 4 binary64))) (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 6 binary64)) (pow.f64 (/.f64 (*.f64 (fma.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 a a) (fma.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 4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale))) (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 4 binary64)) (pow.f64 (/.f64 (*.f64 (fma.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 a a) (fma.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 4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 6 binary64)) (pow.f64 (/.f64 (*.f64 (fma.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 a a) (fma.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 4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 (fma.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 a a) (fma.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 4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale))) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 4 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 4 binary64)) (pow.f64 (/.f64 (*.f64 (fma.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 a a) (fma.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 4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 6 binary64)) (pow.f64 (/.f64 (*.f64 (fma.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 a a) (fma.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 4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (/.f64 (*.f64 (fma.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 a a) (fma.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 4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale))) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 4 binary64)) (pow.f64 (/.f64 (*.f64 (fma.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 a a) (fma.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 4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 (fma.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 a a) (fma.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 -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 (fma.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 a a) (fma.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 -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)))) (*.f64 (fma.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 a a) (fma.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 -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale))))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)) (*.f64 (fma.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 a a) (fma.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 -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 4 binary64)) (*.f64 (*.f64 (fma.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 a a) (fma.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 -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)))) (*.f64 (fma.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 a a) (fma.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 -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)) (*.f64 (fma.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 a a) (fma.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 -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale))))))
(pow.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (fma.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 a a) (fma.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 4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale))) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 4 binary64))) (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 6 binary64)) (pow.f64 (/.f64 (*.f64 (fma.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 a a) (fma.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 4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale))) (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 4 binary64)) (pow.f64 (/.f64 (*.f64 (fma.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 a a) (fma.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 4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 6 binary64)) (pow.f64 (/.f64 (*.f64 (fma.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 a a) (fma.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 4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (fma.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 a a) (fma.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 4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale))) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 4 binary64)))))
(*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 4 binary64)) (pow.f64 (/.f64 (*.f64 (fma.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 a a) (fma.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 4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))
(fma.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))
(pow.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))) #s(literal -1 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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))
(*.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 #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) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 1/2 binary64))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) #s(literal 1/4 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 1/2 binary64)))
(/.f64 (+.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1 binary64)) #s(literal 2 binary64))
(pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))) #s(literal -1 binary64))
(*.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)))))
(*.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (exp.f64 (log.f64 (cos.f64 (*.f64 #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)))))))
(*.f64 (+.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))
(*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(+.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 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))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 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))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 #s(literal 4 binary64) (neg.f64 (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)) (pow.f64 (/.f64 #s(literal 1 binary64) y-scale) #s(literal 2 binary64)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 #s(literal 1 binary64) y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (fma.f64 (*.f64 a a) (fma.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 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 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -4 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -4 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (*.f64 (/.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) #s(literal -4 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (neg.f64 (/.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.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 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 (*.f64 x-scale x-scale) (neg.f64 y-scale))) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale))) (/.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 #s(literal 1 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 #s(literal -4 binary64) x-scale) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 #s(literal -4 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.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 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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))))) x-scale) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.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 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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))))) y-scale) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (neg.f64 (/.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale))) (/.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) y-scale)) (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))) (fma.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 6 binary64))) (fma.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))))
(/.f64 (fma.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 6 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 y-scale y-scale) (*.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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.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 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 #s(literal 4 binary64) x-scale)) (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) (*.f64 x-scale y-scale))) y-scale)
(/.f64 (fma.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 y-scale y-scale) (*.f64 (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)))
(/.f64 (fma.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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)))))) y-scale (*.f64 (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) y-scale))
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 y-scale y-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 y-scale (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) y-scale) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.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 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 #s(literal 4 binary64) x-scale)) (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) (*.f64 x-scale y-scale)))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) y-scale))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) y-scale) (*.f64 (*.f64 y-scale (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))) (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.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 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 #s(literal 4 binary64) x-scale)) (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) (*.f64 x-scale y-scale)))) (*.f64 (*.f64 y-scale (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))) y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 (*.f64 x-scale x-scale) (neg.f64 y-scale))) y-scale) (*.f64 (neg.f64 y-scale) (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.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 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 #s(literal 4 binary64) x-scale)) (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) (*.f64 x-scale y-scale)))) (*.f64 (neg.f64 y-scale) y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)) y-scale) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.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 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 #s(literal 4 binary64) x-scale)) (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) (*.f64 x-scale y-scale)))) (*.f64 (*.f64 y-scale y-scale) y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale) (*.f64 y-scale (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.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 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 #s(literal 4 binary64) x-scale)) (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) (*.f64 x-scale y-scale)))) (*.f64 y-scale y-scale))
(/.f64 (neg.f64 (fma.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-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)))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(pow.f64 (/.f64 (fma.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))) (fma.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 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 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (fma.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(neg.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (neg.f64 y-scale)))
(neg.f64 (/.f64 (/.f64 #s(literal -1 binary64) (*.f64 x-scale x-scale)) y-scale))
(/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) #s(literal 1 binary64)))
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale)
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (neg.f64 (neg.f64 y-scale)))
(/.f64 #s(literal -1 binary64) (*.f64 (*.f64 x-scale x-scale) (neg.f64 y-scale)))
(/.f64 #s(literal -1 binary64) (*.f64 y-scale (neg.f64 (*.f64 x-scale x-scale))))
(/.f64 (/.f64 #s(literal -1 binary64) (*.f64 x-scale x-scale)) (neg.f64 y-scale))
(/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale y-scale))
(/.f64 (/.f64 #s(literal 1 binary64) y-scale) (*.f64 x-scale x-scale))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) x-scale)
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) x-scale)
(/.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) y-scale)) (neg.f64 (*.f64 x-scale x-scale)))
(pow.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale))) #s(literal 2 binary64)))
(neg.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 y-scale)))
(neg.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 (*.f64 x-scale x-scale) (neg.f64 y-scale))) y-scale))
(/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (*.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))) y-scale))
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 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))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) y-scale) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 #s(literal 1 binary64) (*.f64 y-scale (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))) #s(literal 1 binary64)))
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) y-scale))
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 y-scale (/.f64 y-scale (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))))
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 y-scale (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (*.f64 y-scale (*.f64 (*.f64 x-scale x-scale) (neg.f64 y-scale))))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 (*.f64 x-scale x-scale) (neg.f64 y-scale))) (neg.f64 y-scale))
(/.f64 (/.f64 #s(literal -1 binary64) (*.f64 x-scale x-scale)) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (neg.f64 y-scale)))
(/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (neg.f64 y-scale)))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale)))
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.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) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)))) (*.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))) (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.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 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)))) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale))) (*.f64 (neg.f64 y-scale) y-scale))
(/.f64 (*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.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 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))
(/.f64 (*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale))) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)))) (*.f64 (neg.f64 y-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (/.f64 #s(literal -1 binary64) (*.f64 x-scale x-scale))) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 (neg.f64 y-scale) y-scale))
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (/.f64 #s(literal -1 binary64) (*.f64 x-scale x-scale))) (*.f64 (neg.f64 y-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale)))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (*.f64 (neg.f64 y-scale) y-scale))
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 x-scale x-scale)) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))))
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 x-scale x-scale)) (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))) (*.f64 (neg.f64 y-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale y-scale))) #s(literal 1 binary64)) y-scale)
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) x-scale) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) y-scale) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) y-scale) (/.f64 #s(literal -1 binary64) (*.f64 x-scale x-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) #s(literal 1 binary64)) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))) (neg.f64 y-scale))
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) y-scale)) (neg.f64 y-scale))
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (/.f64 #s(literal 1 binary64) y-scale)) (*.f64 (*.f64 x-scale x-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) (*.f64 x-scale y-scale))
(pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))
(pow.f64 (*.f64 y-scale (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) y-scale) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 y-scale (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (*.f64 y-scale y-scale)))
(*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale (*.f64 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))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)) (pow.f64 (/.f64 #s(literal 1 binary64) y-scale) #s(literal 2 binary64)))
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 #s(literal 1 binary64) y-scale)))
(*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (/.f64 #s(literal 1 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) y-scale))
(*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))) (*.f64 x-scale (*.f64 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))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 (*.f64 x-scale x-scale) (neg.f64 y-scale))) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)))
(neg.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.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 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)))) x-scale) (neg.f64 x-scale)))
(neg.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.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 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)))) (neg.f64 x-scale)) x-scale))
(/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale))
(/.f64 #s(literal 1 binary64) (*.f64 x-scale (/.f64 x-scale (fma.f64 (*.f64 a a) (fma.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 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 #s(literal 1 binary64) (/.f64 (*.f64 x-scale x-scale) (fma.f64 (*.f64 a a) (fma.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 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 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (/.f64 x-scale (fma.f64 (*.f64 a a) (fma.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 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)))))) #s(literal 1 binary64)))
(/.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.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 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)))) x-scale) x-scale)
(/.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.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 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)))) x-scale) (neg.f64 (neg.f64 x-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 x-scale (/.f64 x-scale (fma.f64 (*.f64 a a) (fma.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 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 (neg.f64 (fma.f64 (*.f64 a a) (fma.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 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))))) (neg.f64 (*.f64 x-scale x-scale)))
(/.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.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 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)))) (neg.f64 x-scale)) (neg.f64 x-scale))
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 6 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 6 binary64))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 (*.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 (*.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)))) (pow.f64 (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 6 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 6 binary64))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.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)))) (pow.f64 (*.f64 b (cos.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 (*.f64 a a) (fma.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 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 (pow.f64 (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (-.f64 (*.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 (-.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) (-.f64 (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 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 (fma.f64 (*.f64 a a) (fma.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 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)))) #s(literal 1 binary64)) (*.f64 x-scale x-scale))
(/.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.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 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))))) #s(literal 1 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(/.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.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 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)))) x-scale) #s(literal 1 binary64)) x-scale)
(pow.f64 (*.f64 x-scale (/.f64 x-scale (fma.f64 (*.f64 a a) (fma.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 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)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale x-scale) (fma.f64 (*.f64 a a) (fma.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 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))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (/.f64 x-scale (fma.f64 (*.f64 a a) (fma.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 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)))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (fma.f64 (*.f64 a a) (fma.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 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 #s(literal 1 binary64) (*.f64 x-scale x-scale)))
(*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)))
(*.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.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 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)))) x-scale) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.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 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)))) (neg.f64 x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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)))) x-scale))
(neg.f64 (/.f64 (/.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) y-scale) (neg.f64 y-scale)))
(neg.f64 (/.f64 (/.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (neg.f64 y-scale)) y-scale))
(/.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))
(/.f64 #s(literal 1 binary64) (*.f64 y-scale (/.f64 y-scale (fma.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 a a) (fma.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 binary64) (/.f64 (*.f64 y-scale y-scale) (fma.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 a a) (fma.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 binary64) (/.f64 (*.f64 y-scale (/.f64 y-scale (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))
(/.f64 (/.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) y-scale) y-scale)
(/.f64 (/.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) y-scale) (neg.f64 (neg.f64 y-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 y-scale (/.f64 y-scale (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))))))
(/.f64 (/.f64 (fma.f64 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (neg.f64 y-scale)) (neg.f64 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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)))))
(/.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.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)))) (pow.f64 (*.f64 b (sin.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 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))) (*.f64 (*.f64 y-scale y-scale) (-.f64 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #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) (-.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 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 (neg.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (neg.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (/.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) y-scale) #s(literal 1 binary64)) y-scale)
(/.f64 (*.f64 (neg.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) y-scale))
(pow.f64 (*.f64 y-scale (/.f64 y-scale (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 y-scale y-scale) (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 y-scale (/.f64 y-scale (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (fma.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 a a) (fma.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 binary64) (*.f64 y-scale y-scale)))
(*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 #s(literal 1 binary64) y-scale)))
(*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) y-scale))
(*.f64 #s(literal 1 binary64) (/.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) y-scale) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (neg.f64 y-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) y-scale))
(+.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(+.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(-.f64 (/.f64 (pow.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) (pow.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) (pow.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))) (/.f64 (pow.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))))
(fma.f64 #s(literal 4 binary64) (neg.f64 (/.f64 (*.f64 (fma.f64 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(fma.f64 (fma.f64 (*.f64 a a) (fma.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 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 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -4 binary64)) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(fma.f64 (*.f64 (fma.f64 (*.f64 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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -4 binary64)) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(fma.f64 (/.f64 (*.f64 (fma.f64 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -4 binary64) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(fma.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (*.f64 (/.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) #s(literal -4 binary64)) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(fma.f64 (/.f64 (fma.f64 (*.f64 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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale))) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (neg.f64 (/.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(fma.f64 (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(fma.f64 (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale))) (/.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(fma.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(fma.f64 (/.f64 #s(literal -4 binary64) x-scale) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 y-scale y-scale))) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(fma.f64 (/.f64 #s(literal -4 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(fma.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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))))) x-scale) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(fma.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 y-scale y-scale)) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #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 (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(fma.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale y-scale)) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(fma.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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))))) y-scale) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #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 (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(fma.f64 (neg.f64 (/.f64 (fma.f64 (*.f64 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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(fma.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale))) (/.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) y-scale)) (/.f64 #s(literal 1 binary64) y-scale) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) (pow.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (-.f64 (pow.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) (-.f64 (pow.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) (pow.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))))
(/.f64 (-.f64 (pow.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (-.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #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 (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) (pow.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))))
(/.f64 (+.f64 (pow.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (+.f64 (pow.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #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 (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) (pow.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (-.f64 (pow.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 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 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) (-.f64 (pow.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (-.f64 (pow.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) (pow.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))))
#s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale (*.f64 x-scale y-scale))
(*.f64 (*.f64 y-scale y-scale) x-scale)
(*.f64 (*.f64 x-scale y-scale) y-scale)
(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))
(*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) x-scale)
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))
(*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) y-scale)
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (neg.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))))))
(cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))
(cos.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (*.f64 #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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #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)))) (*.f64 (neg.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))))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (neg.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))))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (neg.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))))))
(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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (exp.f64 (log.f64 (cos.f64 (*.f64 #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)))))) (*.f64 (neg.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))))))
(fma.f64 (+.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (+.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.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))))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (neg.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))))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (neg.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 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (fma.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(*.f64 (+.f64 (cos.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))))))
(sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))
(*.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 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 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))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 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))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 #s(literal 4 binary64) (neg.f64 (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)) (pow.f64 (/.f64 #s(literal 1 binary64) y-scale) #s(literal 2 binary64)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 #s(literal 1 binary64) y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (fma.f64 (*.f64 a a) (fma.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 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 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -4 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -4 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (*.f64 (/.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) #s(literal -4 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (neg.f64 (/.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.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 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 (*.f64 x-scale x-scale) (neg.f64 y-scale))) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale))) (/.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 #s(literal 1 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 #s(literal -4 binary64) x-scale) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 #s(literal -4 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.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 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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))))) x-scale) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.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 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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))))) y-scale) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (neg.f64 (/.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.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 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 x-scale x-scale))) (/.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) y-scale)) (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))) (fma.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 6 binary64))) (fma.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))))
(/.f64 (fma.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 6 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 y-scale y-scale) (*.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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.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 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 #s(literal 4 binary64) x-scale)) (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) (*.f64 x-scale y-scale))) y-scale)
(/.f64 (fma.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 y-scale y-scale) (*.f64 (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)))
(/.f64 (fma.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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)))))) y-scale (*.f64 (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale y-scale))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) y-scale))
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 y-scale y-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 y-scale (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) y-scale) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.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 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 #s(literal 4 binary64) x-scale)) (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) (*.f64 x-scale y-scale)))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) y-scale))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) y-scale) (*.f64 (*.f64 y-scale (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))) (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.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 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 #s(literal 4 binary64) x-scale)) (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) (*.f64 x-scale y-scale)))) (*.f64 (*.f64 y-scale (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))) y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 (*.f64 x-scale x-scale) (neg.f64 y-scale))) y-scale) (*.f64 (neg.f64 y-scale) (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.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 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 #s(literal 4 binary64) x-scale)) (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) (*.f64 x-scale y-scale)))) (*.f64 (neg.f64 y-scale) y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale x-scale)) y-scale) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.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 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 #s(literal 4 binary64) x-scale)) (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) (*.f64 x-scale y-scale)))) (*.f64 (*.f64 y-scale y-scale) y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale) (*.f64 y-scale (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.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 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 #s(literal 4 binary64) x-scale)) (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))) (*.f64 x-scale y-scale)))) (*.f64 y-scale y-scale))
(/.f64 (neg.f64 (fma.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-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)))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(pow.f64 (/.f64 (fma.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))) (fma.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 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 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (fma.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (fma.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 (*.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 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.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 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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(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)))
(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)))
(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)))

eval432.0ms (1.2%)

Memory
20.2MiB live, 1 161.0MiB allocated
Compiler

Compiled 242 856 to 6 473 computations (97.3% saved)

prune1.1s (3%)

Memory
35.7MiB live, 3 021.3MiB allocated
Pruning

16 alts after pruning (16 fresh and 0 done)

PrunedKeptTotal
New2 478152 493
Fresh22123
Picked505
Done000
Total2 505162 521
Accuracy
88.2%
Counts
2 521 → 16
Alt Table
Click to see full alt table
StatusAccuracyProgram
20.0%
(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)))
25.7%
(/.f64 #s(approx (- (pow (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) x-scale) 2) (* (+ (* b (* b (- 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))) (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))) (/ (* 4 (+ (* b (* b (+ 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))) (* a (* a (- 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))))) (* x-scale x-scale)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale)))))) (*.f64 y-scale y-scale))
51.7%
#s(approx (- (/ (/ (pow (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) 2) (* x-scale (* x-scale y-scale))) y-scale) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-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) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
57.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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale))
62.3%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) y-scale)))
67.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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 a y-scale)))
79.4%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
52.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 b b) #s(literal -4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 x-scale x-scale))))
62.0%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)))
67.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 b b) #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 x-scale y-scale))))
57.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 y-scale y-scale)) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 x-scale 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 #s(literal -4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 x-scale y-scale))))
65.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 b b) (*.f64 #s(literal -4 binary64) a)) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
65.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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
Compiler

Compiled 958 to 528 computations (44.9% saved)

simplify175.0ms (0.5%)

Memory
-13.5MiB live, 383.0MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

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

Useful iterations: 0 (0.0ms)

IterNodesCost
073955
0100951
1228949
2860939
34636939
47209939
08122934
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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a))
(*.f64 b b)
b
(*.f64 #s(literal -4 binary64) a)
#s(literal -4 binary64)
a
(*.f64 x-scale y-scale)
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 #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a 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 b #s(literal -4 binary64))
b
#s(literal -4 binary64)
(*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.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))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a))
(*.f64 b b)
b
(*.f64 #s(literal -4 binary64) a)
#s(literal -4 binary64)
a
(*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
#s(literal 1 binary64)
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
x-scale
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale y-scale)
y-scale
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))
(/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(*.f64 b b)
b
#s(literal -4 binary64)
(*.f64 x-scale (*.f64 x-scale y-scale))
x-scale
(*.f64 x-scale y-scale)
y-scale
(/.f64 (*.f64 a a) y-scale)
(*.f64 a a)
a
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale)
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale))
(*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(*.f64 b b)
b
#s(literal -4 binary64)
(/.f64 (*.f64 a a) x-scale)
(*.f64 a a)
a
x-scale
(*.f64 y-scale 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 b (*.f64 a (*.f64 a #s(literal -4 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(/.f64 (*.f64 b (*.f64 b (*.f64 a (*.f64 a #s(literal -4 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale))
(*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a))
(*.f64 (*.f64 b b) (*.f64 a #s(literal -4 binary64)))
(*.f64 b b)
b
(*.f64 #s(literal -4 binary64) a)
(*.f64 a #s(literal -4 binary64))
#s(literal -4 binary64)
a
(*.f64 x-scale y-scale)
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 #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 b (*.f64 a (*.f64 a #s(literal -4 binary64))))) (*.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 b (*.f64 b (*.f64 a (*.f64 a #s(literal -4 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 b #s(literal -4 binary64))
b
#s(literal -4 binary64)
(*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.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))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 b (*.f64 b (*.f64 a (*.f64 a #s(literal -4 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 (*.f64 b (*.f64 b (*.f64 a (*.f64 a #s(literal -4 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a))
(*.f64 (*.f64 b b) (*.f64 a #s(literal -4 binary64)))
(*.f64 b b)
b
(*.f64 #s(literal -4 binary64) a)
(*.f64 a #s(literal -4 binary64))
#s(literal -4 binary64)
a
(*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
#s(literal 1 binary64)
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
x-scale
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale y-scale)
y-scale
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a 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 b (*.f64 b (*.f64 a (*.f64 a #s(literal -4 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))
(/.f64 (*.f64 b (*.f64 b (*.f64 a (*.f64 a #s(literal -4 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) (*.f64 x-scale (*.f64 x-scale y-scale)))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(*.f64 b (*.f64 b #s(literal -4 binary64)))
(*.f64 b b)
b
#s(literal -4 binary64)
(*.f64 x-scale (*.f64 x-scale y-scale))
x-scale
(*.f64 x-scale y-scale)
y-scale
(/.f64 (*.f64 a a) y-scale)
(*.f64 a a)
a
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-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 b (*.f64 b (*.f64 a (*.f64 a #s(literal -4 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale)
(/.f64 (*.f64 b (*.f64 b (*.f64 a (*.f64 a #s(literal -4 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 b (*.f64 b (*.f64 a (*.f64 a #s(literal -4 binary64))))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale))
(*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale))))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(*.f64 b (*.f64 b #s(literal -4 binary64)))
(*.f64 b b)
b
#s(literal -4 binary64)
(/.f64 (*.f64 a a) x-scale)
(*.f64 a a)
a
x-scale
(*.f64 y-scale y-scale)
y-scale

localize446.0ms (1.3%)

Memory
32.0MiB live, 1 025.4MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy2.185166010838044
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale)
accuracy8.790052993312752
(/.f64 (*.f64 a a) x-scale)
accuracy13.729476606992801
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale))
accuracy15.306648255766715
(*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale))
accuracy0.13671875
(*.f64 x-scale (*.f64 x-scale y-scale))
accuracy7.349029251870804
(/.f64 (*.f64 a a) y-scale)
accuracy11.717851372953014
(/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))
accuracy12.595776440867441
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))
accuracy5.696544516532013
(*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
accuracy7.783079752664676
(*.f64 x-scale (*.f64 y-scale y-scale))
accuracy8.619295894719448
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a))
accuracy9.137064897168008
(*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
accuracy3.3901276191265954
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
accuracy3.552190820327357
(*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
accuracy7.783079752664676
(*.f64 x-scale (*.f64 y-scale y-scale))
accuracy15.006072511485504
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
accuracy3.4301103607754535
(*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
accuracy5.413465511913784
(/.f64 a (*.f64 x-scale y-scale))
accuracy8.619295894719448
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a))
accuracy10.58063030099058
(/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale))
Samples
232.0ms133×1valid
58.0ms90×0valid
47.0ms33×2valid
Compiler

Compiled 865 to 70 computations (91.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 290.0ms
ival-mult: 70.0ms (24.1% of total)
ival-sin: 58.0ms (20% of total)
adjust: 47.0ms (16.2% of total)
ival-cos: 40.0ms (13.8% of total)
ival-div: 38.0ms (13.1% of total)
ival-pow2: 24.0ms (8.3% of total)
ival-sub: 6.0ms (2.1% of total)
ival-add: 4.0ms (1.4% of total)
ival-pi: 2.0ms (0.7% of total)
exact: 1.0ms (0.3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series174.0ms (0.5%)

Memory
-15.9MiB live, 493.6MiB allocated
Counts
26 → 1 032
Calls
Call 1
Inputs
#s(alt (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) #<representation binary64>) () ())
#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())
#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())
#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())
#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())
#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 b b) #s(literal -4 binary64)) (patch (*.f64 (*.f64 b b) #s(literal -4 binary64)) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) 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 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())
#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())
#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())
#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 a a) y-scale) (patch (/.f64 (*.f64 a a) y-scale) #<representation binary64>) () ())
#s(alt (*.f64 x-scale (*.f64 x-scale y-scale)) (patch (*.f64 x-scale (*.f64 x-scale y-scale)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 a a) x-scale) (patch (/.f64 (*.f64 a a) x-scale) #<representation binary64>) () ())
Outputs
#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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 -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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 -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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 -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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 -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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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)))))) (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 (+ (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor 0 b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor 0 b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor 0 b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor 0 b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor -inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor -inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor -inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor -inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor 0 b) (#s(alt (*.f64 (*.f64 b b) #s(literal -4 binary64)) (patch (*.f64 (*.f64 b b) #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor 0 b) (#s(alt (*.f64 (*.f64 b b) #s(literal -4 binary64)) (patch (*.f64 (*.f64 b b) #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor 0 b) (#s(alt (*.f64 (*.f64 b b) #s(literal -4 binary64)) (patch (*.f64 (*.f64 b b) #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor 0 b) (#s(alt (*.f64 (*.f64 b b) #s(literal -4 binary64)) (patch (*.f64 (*.f64 b b) #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor inf b) (#s(alt (*.f64 (*.f64 b b) #s(literal -4 binary64)) (patch (*.f64 (*.f64 b b) #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor inf b) (#s(alt (*.f64 (*.f64 b b) #s(literal -4 binary64)) (patch (*.f64 (*.f64 b b) #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor inf b) (#s(alt (*.f64 (*.f64 b b) #s(literal -4 binary64)) (patch (*.f64 (*.f64 b b) #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor inf b) (#s(alt (*.f64 (*.f64 b b) #s(literal -4 binary64)) (patch (*.f64 (*.f64 b b) #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor -inf b) (#s(alt (*.f64 (*.f64 b b) #s(literal -4 binary64)) (patch (*.f64 (*.f64 b b) #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor -inf b) (#s(alt (*.f64 (*.f64 b b) #s(literal -4 binary64)) (patch (*.f64 (*.f64 b b) #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor -inf b) (#s(alt (*.f64 (*.f64 b b) #s(literal -4 binary64)) (patch (*.f64 (*.f64 b b) #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor -inf b) (#s(alt (*.f64 (*.f64 b b) #s(literal -4 binary64)) (patch (*.f64 (*.f64 b 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 b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) (patch (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) 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 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) x-scale)) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 a) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 a) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 a) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 a) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf a) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf a) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf a) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf a) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf a) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf a) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf a) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf a) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 a a) (*.f64 x-scale (*.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 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 (/ (pow a 2) y-scale) (taylor 0 a) (#s(alt (/.f64 (*.f64 a a) y-scale) (patch (/.f64 (*.f64 a a) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) y-scale) (taylor 0 a) (#s(alt (/.f64 (*.f64 a a) y-scale) (patch (/.f64 (*.f64 a a) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) y-scale) (taylor 0 a) (#s(alt (/.f64 (*.f64 a a) y-scale) (patch (/.f64 (*.f64 a a) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) y-scale) (taylor 0 a) (#s(alt (/.f64 (*.f64 a a) y-scale) (patch (/.f64 (*.f64 a a) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) y-scale) (taylor inf a) (#s(alt (/.f64 (*.f64 a a) y-scale) (patch (/.f64 (*.f64 a a) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) y-scale) (taylor inf a) (#s(alt (/.f64 (*.f64 a a) y-scale) (patch (/.f64 (*.f64 a a) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) y-scale) (taylor inf a) (#s(alt (/.f64 (*.f64 a a) y-scale) (patch (/.f64 (*.f64 a a) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) y-scale) (taylor inf a) (#s(alt (/.f64 (*.f64 a a) y-scale) (patch (/.f64 (*.f64 a a) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) y-scale) (taylor -inf a) (#s(alt (/.f64 (*.f64 a a) y-scale) (patch (/.f64 (*.f64 a a) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) y-scale) (taylor -inf a) (#s(alt (/.f64 (*.f64 a a) y-scale) (patch (/.f64 (*.f64 a a) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) y-scale) (taylor -inf a) (#s(alt (/.f64 (*.f64 a a) y-scale) (patch (/.f64 (*.f64 a a) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) y-scale) (taylor -inf a) (#s(alt (/.f64 (*.f64 a a) y-scale) (patch (/.f64 (*.f64 a a) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) y-scale) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a a) y-scale) (patch (/.f64 (*.f64 a a) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) y-scale) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a a) y-scale) (patch (/.f64 (*.f64 a a) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) y-scale) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a a) y-scale) (patch (/.f64 (*.f64 a a) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) y-scale) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a a) y-scale) (patch (/.f64 (*.f64 a a) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) y-scale) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a a) y-scale) (patch (/.f64 (*.f64 a a) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) y-scale) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a a) y-scale) (patch (/.f64 (*.f64 a a) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) y-scale) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a a) y-scale) (patch (/.f64 (*.f64 a a) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) y-scale) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a a) y-scale) (patch (/.f64 (*.f64 a a) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) y-scale) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a a) y-scale) (patch (/.f64 (*.f64 a a) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) y-scale) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a a) y-scale) (patch (/.f64 (*.f64 a a) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) y-scale) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a a) y-scale) (patch (/.f64 (*.f64 a a) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) y-scale) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a a) y-scale) (patch (/.f64 (*.f64 a a) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) y-scale) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale y-scale)) (patch (*.f64 x-scale (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) y-scale) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale y-scale)) (patch (*.f64 x-scale (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) y-scale) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale y-scale)) (patch (*.f64 x-scale (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) y-scale) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale y-scale)) (patch (*.f64 x-scale (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) y-scale) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale y-scale)) (patch (*.f64 x-scale (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) y-scale) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale y-scale)) (patch (*.f64 x-scale (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) y-scale) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale y-scale)) (patch (*.f64 x-scale (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) y-scale) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale y-scale)) (patch (*.f64 x-scale (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) y-scale) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale y-scale)) (patch (*.f64 x-scale (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) y-scale) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale y-scale)) (patch (*.f64 x-scale (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) y-scale) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale y-scale)) (patch (*.f64 x-scale (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) y-scale) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale y-scale)) (patch (*.f64 x-scale (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) y-scale) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale y-scale)) (patch (*.f64 x-scale (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) y-scale) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale y-scale)) (patch (*.f64 x-scale (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) y-scale) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale y-scale)) (patch (*.f64 x-scale (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) y-scale) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale y-scale)) (patch (*.f64 x-scale (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) y-scale) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale y-scale)) (patch (*.f64 x-scale (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) y-scale) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale y-scale)) (patch (*.f64 x-scale (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) y-scale) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale y-scale)) (patch (*.f64 x-scale (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) y-scale) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale y-scale)) (patch (*.f64 x-scale (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) y-scale) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale y-scale)) (patch (*.f64 x-scale (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) y-scale) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale y-scale)) (patch (*.f64 x-scale (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) y-scale) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale y-scale)) (patch (*.f64 x-scale (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) y-scale) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale y-scale)) (patch (*.f64 x-scale (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) x-scale) (taylor 0 a) (#s(alt (/.f64 (*.f64 a a) x-scale) (patch (/.f64 (*.f64 a a) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) x-scale) (taylor 0 a) (#s(alt (/.f64 (*.f64 a a) x-scale) (patch (/.f64 (*.f64 a a) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) x-scale) (taylor 0 a) (#s(alt (/.f64 (*.f64 a a) x-scale) (patch (/.f64 (*.f64 a a) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) x-scale) (taylor 0 a) (#s(alt (/.f64 (*.f64 a a) x-scale) (patch (/.f64 (*.f64 a a) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) x-scale) (taylor inf a) (#s(alt (/.f64 (*.f64 a a) x-scale) (patch (/.f64 (*.f64 a a) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) x-scale) (taylor inf a) (#s(alt (/.f64 (*.f64 a a) x-scale) (patch (/.f64 (*.f64 a a) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) x-scale) (taylor inf a) (#s(alt (/.f64 (*.f64 a a) x-scale) (patch (/.f64 (*.f64 a a) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) x-scale) (taylor inf a) (#s(alt (/.f64 (*.f64 a a) x-scale) (patch (/.f64 (*.f64 a a) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) x-scale) (taylor -inf a) (#s(alt (/.f64 (*.f64 a a) x-scale) (patch (/.f64 (*.f64 a a) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) x-scale) (taylor -inf a) (#s(alt (/.f64 (*.f64 a a) x-scale) (patch (/.f64 (*.f64 a a) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) x-scale) (taylor -inf a) (#s(alt (/.f64 (*.f64 a a) x-scale) (patch (/.f64 (*.f64 a a) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) x-scale) (taylor -inf a) (#s(alt (/.f64 (*.f64 a a) x-scale) (patch (/.f64 (*.f64 a a) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) x-scale) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a a) x-scale) (patch (/.f64 (*.f64 a a) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) x-scale) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a a) x-scale) (patch (/.f64 (*.f64 a a) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) x-scale) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a a) x-scale) (patch (/.f64 (*.f64 a a) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) x-scale) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a a) x-scale) (patch (/.f64 (*.f64 a a) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) x-scale) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a a) x-scale) (patch (/.f64 (*.f64 a a) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) x-scale) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a a) x-scale) (patch (/.f64 (*.f64 a a) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) x-scale) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a a) x-scale) (patch (/.f64 (*.f64 a a) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) x-scale) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a a) x-scale) (patch (/.f64 (*.f64 a a) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) x-scale) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a a) x-scale) (patch (/.f64 (*.f64 a a) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) x-scale) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a a) x-scale) (patch (/.f64 (*.f64 a a) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) x-scale) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a a) x-scale) (patch (/.f64 (*.f64 a a) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) x-scale) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a a) x-scale) (patch (/.f64 (*.f64 a a) x-scale) #<representation binary64>) () ())) ())
Calls

258 calls:

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

simplify829.0ms (2.3%)

Memory
-51.2MiB live, 1 096.0MiB allocated
Algorithm
egg-herbie
Rules
12 414×lower-fma.f64
12 414×lower-fma.f32
7 620×lower-*.f64
7 620×lower-*.f32
4 684×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
021537956
178336106
2370535036
0801334396
Stop Event
iter limit
node limit
Counts
1 032 → 1 032
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 y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (* a (pow b 2)))
(* -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)))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (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 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-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))
(/ a (* x-scale y-scale))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(* 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))
(/ (pow a 2) y-scale)
(/ (pow a 2) y-scale)
(/ (pow a 2) y-scale)
(/ (pow a 2) y-scale)
(/ (pow a 2) y-scale)
(/ (pow a 2) y-scale)
(/ (pow a 2) y-scale)
(/ (pow a 2) y-scale)
(/ (pow a 2) y-scale)
(/ (pow a 2) y-scale)
(/ (pow a 2) y-scale)
(/ (pow a 2) y-scale)
(/ (pow a 2) y-scale)
(/ (pow a 2) y-scale)
(/ (pow a 2) y-scale)
(/ (pow a 2) y-scale)
(/ (pow a 2) y-scale)
(/ (pow a 2) y-scale)
(/ (pow a 2) y-scale)
(/ (pow a 2) y-scale)
(/ (pow a 2) y-scale)
(/ (pow a 2) y-scale)
(/ (pow a 2) y-scale)
(/ (pow a 2) y-scale)
(* (pow x-scale 2) y-scale)
(* (pow x-scale 2) y-scale)
(* (pow x-scale 2) y-scale)
(* (pow x-scale 2) y-scale)
(* (pow x-scale 2) y-scale)
(* (pow x-scale 2) y-scale)
(* (pow x-scale 2) y-scale)
(* (pow x-scale 2) y-scale)
(* (pow x-scale 2) y-scale)
(* (pow x-scale 2) y-scale)
(* (pow x-scale 2) y-scale)
(* (pow x-scale 2) y-scale)
(* (pow x-scale 2) y-scale)
(* (pow x-scale 2) y-scale)
(* (pow x-scale 2) y-scale)
(* (pow x-scale 2) y-scale)
(* (pow x-scale 2) y-scale)
(* (pow x-scale 2) y-scale)
(* (pow x-scale 2) y-scale)
(* (pow x-scale 2) y-scale)
(* (pow x-scale 2) y-scale)
(* (pow x-scale 2) y-scale)
(* (pow x-scale 2) y-scale)
(* (pow x-scale 2) y-scale)
(/ (pow a 2) x-scale)
(/ (pow a 2) x-scale)
(/ (pow a 2) x-scale)
(/ (pow a 2) x-scale)
(/ (pow a 2) x-scale)
(/ (pow a 2) x-scale)
(/ (pow a 2) x-scale)
(/ (pow a 2) x-scale)
(/ (pow a 2) x-scale)
(/ (pow a 2) x-scale)
(/ (pow a 2) x-scale)
(/ (pow a 2) x-scale)
(/ (pow a 2) x-scale)
(/ (pow a 2) x-scale)
(/ (pow a 2) x-scale)
(/ (pow a 2) x-scale)
(/ (pow a 2) x-scale)
(/ (pow a 2) x-scale)
(/ (pow a 2) x-scale)
(/ (pow a 2) x-scale)
(/ (pow a 2) x-scale)
(/ (pow a 2) x-scale)
(/ (pow a 2) x-scale)
(/ (pow a 2) x-scale)
Outputs
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.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 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -4 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal -1/787320000 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (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 angle (*.f64 angle (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 angle (*.f64 angle (fma.f64 #s(literal 4 binary64) (fma.f64 (-.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 1/102036672000000 binary64) (*.f64 #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/32400 binary64) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (PI.f64) (*.f64 (PI.f64) (*.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 (*.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 (*.f64 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 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)))) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1/196830000 binary64)))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-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)))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -4 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal -1/787320000 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (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 angle (*.f64 angle (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 angle (*.f64 angle (fma.f64 #s(literal 4 binary64) (fma.f64 (-.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 1/102036672000000 binary64) (*.f64 #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/32400 binary64) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (PI.f64) (*.f64 (PI.f64) (*.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 (*.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 (*.f64 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 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)))) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1/196830000 binary64)))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 b)
(*.f64 #s(literal -4 binary64) b)
(* -4 b)
(*.f64 #s(literal -4 binary64) b)
(* -4 b)
(*.f64 #s(literal -4 binary64) b)
(* -4 b)
(*.f64 #s(literal -4 binary64) b)
(* -4 b)
(*.f64 #s(literal -4 binary64) b)
(* -4 b)
(*.f64 #s(literal -4 binary64) b)
(* -4 b)
(*.f64 #s(literal -4 binary64) b)
(* -4 b)
(*.f64 #s(literal -4 binary64) b)
(* -4 b)
(*.f64 #s(literal -4 binary64) b)
(* -4 b)
(*.f64 #s(literal -4 binary64) b)
(* -4 b)
(*.f64 #s(literal -4 binary64) b)
(* -4 b)
(*.f64 #s(literal -4 binary64) b)
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -4 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal -1/787320000 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (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 angle (*.f64 angle (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 angle (*.f64 angle (fma.f64 #s(literal 4 binary64) (fma.f64 (-.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 1/102036672000000 binary64) (*.f64 #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/32400 binary64) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (PI.f64) (*.f64 (PI.f64) (*.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 (*.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 (*.f64 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 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)))) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1/196830000 binary64)))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.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 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (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 -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -4 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal -1/787320000 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (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 angle (*.f64 angle (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 angle (*.f64 angle (fma.f64 #s(literal 4 binary64) (fma.f64 (-.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 1/102036672000000 binary64) (*.f64 #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/32400 binary64) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (PI.f64) (*.f64 (PI.f64) (*.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 (*.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 (*.f64 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 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)))) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1/196830000 binary64)))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (/ (pow b 2) (* (pow x-scale 2) y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* -4 (pow b 2))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(* -4 (pow b 2))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(* -4 (pow b 2))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(* -4 (pow b 2))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(* -4 (pow b 2))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(* -4 (pow b 2))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(* -4 (pow b 2))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(* -4 (pow b 2))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(* -4 (pow b 2))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(* -4 (pow b 2))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(* -4 (pow b 2))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(* -4 (pow b 2))
(*.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 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.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)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -4 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal -1/787320000 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (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 angle (*.f64 angle (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 angle (*.f64 angle (fma.f64 #s(literal 4 binary64) (fma.f64 (-.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 1/102036672000000 binary64) (*.f64 #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/32400 binary64) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (PI.f64) (*.f64 (PI.f64) (*.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 (*.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 (*.f64 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 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)))) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1/196830000 binary64)))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(/ 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 a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (pow a 2) y-scale)
(/.f64 (*.f64 a a) y-scale)
(/ (pow a 2) y-scale)
(/.f64 (*.f64 a a) y-scale)
(/ (pow a 2) y-scale)
(/.f64 (*.f64 a a) y-scale)
(/ (pow a 2) y-scale)
(/.f64 (*.f64 a a) y-scale)
(/ (pow a 2) y-scale)
(/.f64 (*.f64 a a) y-scale)
(/ (pow a 2) y-scale)
(/.f64 (*.f64 a a) y-scale)
(/ (pow a 2) y-scale)
(/.f64 (*.f64 a a) y-scale)
(/ (pow a 2) y-scale)
(/.f64 (*.f64 a a) y-scale)
(/ (pow a 2) y-scale)
(/.f64 (*.f64 a a) y-scale)
(/ (pow a 2) y-scale)
(/.f64 (*.f64 a a) y-scale)
(/ (pow a 2) y-scale)
(/.f64 (*.f64 a a) y-scale)
(/ (pow a 2) y-scale)
(/.f64 (*.f64 a a) y-scale)
(/ (pow a 2) y-scale)
(/.f64 (*.f64 a a) y-scale)
(/ (pow a 2) y-scale)
(/.f64 (*.f64 a a) y-scale)
(/ (pow a 2) y-scale)
(/.f64 (*.f64 a a) y-scale)
(/ (pow a 2) y-scale)
(/.f64 (*.f64 a a) y-scale)
(/ (pow a 2) y-scale)
(/.f64 (*.f64 a a) y-scale)
(/ (pow a 2) y-scale)
(/.f64 (*.f64 a a) y-scale)
(/ (pow a 2) y-scale)
(/.f64 (*.f64 a a) y-scale)
(/ (pow a 2) y-scale)
(/.f64 (*.f64 a a) y-scale)
(/ (pow a 2) y-scale)
(/.f64 (*.f64 a a) y-scale)
(/ (pow a 2) y-scale)
(/.f64 (*.f64 a a) y-scale)
(/ (pow a 2) y-scale)
(/.f64 (*.f64 a a) y-scale)
(/ (pow a 2) y-scale)
(/.f64 (*.f64 a a) y-scale)
(* (pow x-scale 2) y-scale)
(*.f64 x-scale (*.f64 x-scale y-scale))
(* (pow x-scale 2) y-scale)
(*.f64 x-scale (*.f64 x-scale y-scale))
(* (pow x-scale 2) y-scale)
(*.f64 x-scale (*.f64 x-scale y-scale))
(* (pow x-scale 2) y-scale)
(*.f64 x-scale (*.f64 x-scale y-scale))
(* (pow x-scale 2) y-scale)
(*.f64 x-scale (*.f64 x-scale y-scale))
(* (pow x-scale 2) y-scale)
(*.f64 x-scale (*.f64 x-scale y-scale))
(* (pow x-scale 2) y-scale)
(*.f64 x-scale (*.f64 x-scale y-scale))
(* (pow x-scale 2) y-scale)
(*.f64 x-scale (*.f64 x-scale y-scale))
(* (pow x-scale 2) y-scale)
(*.f64 x-scale (*.f64 x-scale y-scale))
(* (pow x-scale 2) y-scale)
(*.f64 x-scale (*.f64 x-scale y-scale))
(* (pow x-scale 2) y-scale)
(*.f64 x-scale (*.f64 x-scale y-scale))
(* (pow x-scale 2) y-scale)
(*.f64 x-scale (*.f64 x-scale y-scale))
(* (pow x-scale 2) y-scale)
(*.f64 x-scale (*.f64 x-scale y-scale))
(* (pow x-scale 2) y-scale)
(*.f64 x-scale (*.f64 x-scale y-scale))
(* (pow x-scale 2) y-scale)
(*.f64 x-scale (*.f64 x-scale y-scale))
(* (pow x-scale 2) y-scale)
(*.f64 x-scale (*.f64 x-scale y-scale))
(* (pow x-scale 2) y-scale)
(*.f64 x-scale (*.f64 x-scale y-scale))
(* (pow x-scale 2) y-scale)
(*.f64 x-scale (*.f64 x-scale y-scale))
(* (pow x-scale 2) y-scale)
(*.f64 x-scale (*.f64 x-scale y-scale))
(* (pow x-scale 2) y-scale)
(*.f64 x-scale (*.f64 x-scale y-scale))
(* (pow x-scale 2) y-scale)
(*.f64 x-scale (*.f64 x-scale y-scale))
(* (pow x-scale 2) y-scale)
(*.f64 x-scale (*.f64 x-scale y-scale))
(* (pow x-scale 2) y-scale)
(*.f64 x-scale (*.f64 x-scale y-scale))
(* (pow x-scale 2) y-scale)
(*.f64 x-scale (*.f64 x-scale y-scale))
(/ (pow a 2) x-scale)
(/.f64 (*.f64 a a) x-scale)
(/ (pow a 2) x-scale)
(/.f64 (*.f64 a a) x-scale)
(/ (pow a 2) x-scale)
(/.f64 (*.f64 a a) x-scale)
(/ (pow a 2) x-scale)
(/.f64 (*.f64 a a) x-scale)
(/ (pow a 2) x-scale)
(/.f64 (*.f64 a a) x-scale)
(/ (pow a 2) x-scale)
(/.f64 (*.f64 a a) x-scale)
(/ (pow a 2) x-scale)
(/.f64 (*.f64 a a) x-scale)
(/ (pow a 2) x-scale)
(/.f64 (*.f64 a a) x-scale)
(/ (pow a 2) x-scale)
(/.f64 (*.f64 a a) x-scale)
(/ (pow a 2) x-scale)
(/.f64 (*.f64 a a) x-scale)
(/ (pow a 2) x-scale)
(/.f64 (*.f64 a a) x-scale)
(/ (pow a 2) x-scale)
(/.f64 (*.f64 a a) x-scale)
(/ (pow a 2) x-scale)
(/.f64 (*.f64 a a) x-scale)
(/ (pow a 2) x-scale)
(/.f64 (*.f64 a a) x-scale)
(/ (pow a 2) x-scale)
(/.f64 (*.f64 a a) x-scale)
(/ (pow a 2) x-scale)
(/.f64 (*.f64 a a) x-scale)
(/ (pow a 2) x-scale)
(/.f64 (*.f64 a a) x-scale)
(/ (pow a 2) x-scale)
(/.f64 (*.f64 a a) x-scale)
(/ (pow a 2) x-scale)
(/.f64 (*.f64 a a) x-scale)
(/ (pow a 2) x-scale)
(/.f64 (*.f64 a a) x-scale)
(/ (pow a 2) x-scale)
(/.f64 (*.f64 a a) x-scale)
(/ (pow a 2) x-scale)
(/.f64 (*.f64 a a) x-scale)
(/ (pow a 2) x-scale)
(/.f64 (*.f64 a a) x-scale)
(/ (pow a 2) x-scale)
(/.f64 (*.f64 a a) x-scale)

rewrite308.0ms (0.9%)

Memory
1.5MiB live, 636.8MiB allocated
Rules
4 896×lower-*.f32
4 860×lower-*.f64
3 410×lower-fma.f64
3 410×lower-fma.f32
3 150×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
073854
0100718
1433656
23447617
08397612
Stop Event
iter limit
node limit
iter limit
Counts
26 → 1 430
Calls
Call 1
Inputs
(*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a 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 b #s(literal -4 binary64))
(*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(*.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a 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 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)))
(/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale)
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) 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 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale))
(*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 a a) y-scale)
(*.f64 x-scale (*.f64 x-scale y-scale))
(/.f64 (*.f64 a a) x-scale)
Outputs
(exp.f64 (*.f64 (log.f64 (*.f64 x-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 x-scale)) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))) (neg.f64 x-scale)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale)))) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale)))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 x-scale (*.f64 y-scale (neg.f64 y-scale)))) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 x-scale (*.f64 y-scale (neg.f64 y-scale)))))
(neg.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))) (neg.f64 x-scale)))
(neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale)))) x-scale))
(/.f64 a (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)))
(/.f64 a (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(/.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))) y-scale))
(/.f64 (*.f64 a a) (*.f64 y-scale (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64)))))
(/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale)))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale) x-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))) (/.f64 y-scale (*.f64 a a))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale)))
(/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a a)))
(/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 y-scale (*.f64 a a)))
(/.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))) (neg.f64 (neg.f64 x-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 x-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 x-scale))
(/.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 y-scale (neg.f64 y-scale))))
(/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale (neg.f64 y-scale)) x-scale))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (*.f64 (*.f64 x-scale y-scale) (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 a)) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 a x-scale)) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (neg.f64 a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (/.f64 a x-scale)) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) a) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (neg.f64 a)) (*.f64 y-scale (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (/.f64 a x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)) (*.f64 (*.f64 x-scale y-scale) (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) y-scale))
(/.f64 (*.f64 (neg.f64 a) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 a) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 (*.f64 (neg.f64 a) (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) y-scale))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)) (*.f64 y-scale (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 a a))) (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))) (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a a)))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (/.f64 y-scale (*.f64 a a))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (neg.f64 (*.f64 a a))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (neg.f64 (*.f64 a a))) (*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))) y-scale))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))) (/.f64 y-scale (*.f64 a a))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (neg.f64 (*.f64 a a))) (*.f64 (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))) (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 y-scale (*.f64 a a))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) (neg.f64 (*.f64 a a))) (*.f64 (*.f64 x-scale y-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 y-scale (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale)))))
(/.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 (/.f64 y-scale (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 (/.f64 y-scale (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale)))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale)) (*.f64 (/.f64 y-scale (*.f64 a a)) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64)))))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale)))))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale)) (*.f64 (neg.f64 y-scale) (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale)) (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 (*.f64 b #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 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))) #s(literal 1 binary64)) x-scale)
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (neg.f64 a)) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (/.f64 a x-scale)) y-scale)
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) y-scale)
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #s(literal 1 binary64)) (/.f64 y-scale (*.f64 a a)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (*.f64 a a))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))))
(/.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal -1 binary64)) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (*.f64 b (*.f64 a a)) (*.f64 b #s(literal -4 binary64))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (/.f64 #s(literal 1 binary64) x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) x-scale)) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) x-scale)) y-scale)
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (/.f64 a (*.f64 x-scale y-scale))) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (/.f64 a (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (/.f64 (*.f64 a a) y-scale)) (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) (/.f64 (*.f64 a a) y-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) x-scale) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 x-scale y-scale)) y-scale)
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) x-scale) y-scale)
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) x-scale) (*.f64 x-scale y-scale))
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) (*.f64 x-scale y-scale)) x-scale)
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) (*.f64 x-scale x-scale)) y-scale)
(pow.f64 (*.f64 x-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale)) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale) x-scale) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 (*.f64 x-scale y-scale) a)) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))) (/.f64 y-scale (*.f64 a a))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale)) #s(literal -1 binary64))
(*.f64 b (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 b (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 b #s(literal -4 binary64))))
(*.f64 b (*.f64 b (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 b (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 b b) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 b b) (*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)))
(*.f64 (*.f64 b b) (/.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 #s(literal -4 binary64) (*.f64 b (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))))
(*.f64 a (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(*.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 (*.f64 b b) (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 b #s(literal -4 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))
(*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale)))
(*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)))
(*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))
(*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale)))) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)))
(*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) a) y-scale) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a a) y-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) y-scale) (*.f64 (*.f64 a (/.f64 a (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) y-scale) (/.f64 (*.f64 a (/.f64 a (*.f64 x-scale y-scale))) x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) b)
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 b b))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) (/.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale))
(*.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale)) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (*.f64 a (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (/.f64 (*.f64 a a) y-scale) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (/.f64 (*.f64 a a) x-scale) x-scale))
(*.f64 (/.f64 (/.f64 (*.f64 a a) x-scale) x-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) x-scale) (/.f64 a y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) y-scale) (/.f64 a x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) y-scale) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (/.f64 (*.f64 a a) y-scale) y-scale))
(*.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #s(literal -4 binary64))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b b)) (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) a) y-scale))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) a) (/.f64 a y-scale))
(*.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 b b)) (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 b b) x-scale)) (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) a)
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (*.f64 b (*.f64 #s(literal -4 binary64) a)))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 b b)) (*.f64 #s(literal -4 binary64) a))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 (*.f64 b b) #s(literal -4 binary64))) a)
(*.f64 (pow.f64 (/.f64 x-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(*.f64 (pow.f64 (/.f64 x-scale (*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (neg.f64 y-scale))))
(*.f64 (pow.f64 (/.f64 x-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))) #s(literal -1 binary64)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 y-scale (neg.f64 x-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 y-scale (neg.f64 x-scale))))
(neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 y-scale (neg.f64 x-scale))))
(neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) y-scale)
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)) (neg.f64 (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (neg.f64 y-scale))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) y-scale) x-scale)
(/.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 #s(literal -4 binary64) a)) y-scale)
(/.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 #s(literal -4 binary64) a) y-scale)) x-scale)
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) #s(literal -1 binary64))
(*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))))
(*.f64 b (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))))
(*.f64 b (/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) a) (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 (*.f64 b b) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (neg.f64 x-scale))))
(*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 #s(literal -4 binary64) a) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) a) y-scale) (/.f64 (*.f64 b b) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) y-scale) (/.f64 a x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (pow.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) (/.f64 a y-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))) (*.f64 b b))
(*.f64 (/.f64 b x-scale) (/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) y-scale))
(*.f64 (/.f64 b y-scale) (/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) x-scale))
(*.f64 (/.f64 (*.f64 b b) y-scale) (/.f64 (*.f64 #s(literal -4 binary64) a) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) a) x-scale) (/.f64 (*.f64 b b) y-scale))
(*.f64 (pow.f64 (/.f64 x-scale b) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale (*.f64 b (*.f64 #s(literal -4 binary64) a))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 x-scale (*.f64 #s(literal -4 binary64) a)) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale (*.f64 b b)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 y-scale (*.f64 b b)) #s(literal -1 binary64)) (pow.f64 (/.f64 x-scale (*.f64 #s(literal -4 binary64) a)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 y-scale b) #s(literal -1 binary64)) (pow.f64 (/.f64 x-scale (*.f64 b (*.f64 #s(literal -4 binary64) a))) #s(literal -1 binary64)))
(*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(*.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 b b))
(*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) a)
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) b)
(*.f64 (*.f64 (*.f64 b b) a) #s(literal -4 binary64))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(exp.f64 (*.f64 (log.f64 (*.f64 x-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 x-scale)) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))) (neg.f64 x-scale)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale)))) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale)))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 x-scale (*.f64 y-scale (neg.f64 y-scale)))) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 x-scale (*.f64 y-scale (neg.f64 y-scale)))))
(neg.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))) (neg.f64 x-scale)))
(neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale)))) x-scale))
(/.f64 a (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)))
(/.f64 a (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(/.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))) y-scale))
(/.f64 (*.f64 a a) (*.f64 y-scale (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64)))))
(/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale)))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale) x-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))) (/.f64 y-scale (*.f64 a a))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale)))
(/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a a)))
(/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 y-scale (*.f64 a a)))
(/.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))) (neg.f64 (neg.f64 x-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 x-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 x-scale))
(/.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 y-scale (neg.f64 y-scale))))
(/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale (neg.f64 y-scale)) x-scale))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (*.f64 (*.f64 x-scale y-scale) (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 a)) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 a x-scale)) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (neg.f64 a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (/.f64 a x-scale)) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) a) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (neg.f64 a)) (*.f64 y-scale (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (/.f64 a x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)) (*.f64 (*.f64 x-scale y-scale) (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) y-scale))
(/.f64 (*.f64 (neg.f64 a) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 a) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 (*.f64 (neg.f64 a) (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) y-scale))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)) (*.f64 y-scale (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 a a))) (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))) (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a a)))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (/.f64 y-scale (*.f64 a a))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (neg.f64 (*.f64 a a))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (neg.f64 (*.f64 a a))) (*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))) y-scale))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))) (/.f64 y-scale (*.f64 a a))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (neg.f64 (*.f64 a a))) (*.f64 (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))) (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 y-scale (*.f64 a a))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) (neg.f64 (*.f64 a a))) (*.f64 (*.f64 x-scale y-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 y-scale (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale)))))
(/.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 (/.f64 y-scale (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 (/.f64 y-scale (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale)))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale)) (*.f64 (/.f64 y-scale (*.f64 a a)) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64)))))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale)))))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale)) (*.f64 (neg.f64 y-scale) (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale)) (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 (*.f64 b #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 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))) #s(literal 1 binary64)) x-scale)
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (neg.f64 a)) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (/.f64 a x-scale)) y-scale)
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) y-scale)
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #s(literal 1 binary64)) (/.f64 y-scale (*.f64 a a)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (*.f64 a a))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))))
(/.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal -1 binary64)) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (*.f64 b (*.f64 a a)) (*.f64 b #s(literal -4 binary64))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (/.f64 #s(literal 1 binary64) x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) x-scale)) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) x-scale)) y-scale)
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (/.f64 a (*.f64 x-scale y-scale))) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (/.f64 a (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (/.f64 (*.f64 a a) y-scale)) (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) (/.f64 (*.f64 a a) y-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) x-scale) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 x-scale y-scale)) y-scale)
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) x-scale) y-scale)
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) x-scale) (*.f64 x-scale y-scale))
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) (*.f64 x-scale y-scale)) x-scale)
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) (*.f64 x-scale x-scale)) y-scale)
(pow.f64 (*.f64 x-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale)) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale) x-scale) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 (*.f64 x-scale y-scale) a)) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))) (/.f64 y-scale (*.f64 a a))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale)) #s(literal -1 binary64))
(*.f64 b (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 b (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 b #s(literal -4 binary64))))
(*.f64 b (*.f64 b (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 b (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 b b) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 b b) (*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)))
(*.f64 (*.f64 b b) (/.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 #s(literal -4 binary64) (*.f64 b (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))))
(*.f64 a (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(*.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 (*.f64 b b) (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 b #s(literal -4 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))
(*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale)))
(*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)))
(*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))
(*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale)))) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)))
(*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) a) y-scale) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a a) y-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) y-scale) (*.f64 (*.f64 a (/.f64 a (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) y-scale) (/.f64 (*.f64 a (/.f64 a (*.f64 x-scale y-scale))) x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) b)
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 b b))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) (/.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale))
(*.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale)) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (*.f64 a (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (/.f64 (*.f64 a a) y-scale) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (/.f64 (*.f64 a a) x-scale) x-scale))
(*.f64 (/.f64 (/.f64 (*.f64 a a) x-scale) x-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) x-scale) (/.f64 a y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) y-scale) (/.f64 a x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) y-scale) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (/.f64 (*.f64 a a) y-scale) y-scale))
(*.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #s(literal -4 binary64))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b b)) (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) a) y-scale))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) a) (/.f64 a y-scale))
(*.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 b b)) (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 b b) x-scale)) (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) a)
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (*.f64 b (*.f64 #s(literal -4 binary64) a)))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 b b)) (*.f64 #s(literal -4 binary64) a))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 (*.f64 b b) #s(literal -4 binary64))) a)
(*.f64 (pow.f64 (/.f64 x-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(*.f64 (pow.f64 (/.f64 x-scale (*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (neg.f64 y-scale))))
(*.f64 (pow.f64 (/.f64 x-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 b #s(literal -4 binary64))
(*.f64 #s(literal -4 binary64) b)
(/.f64 b (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a a)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a a))))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 b (*.f64 a a))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) b) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 b #s(literal 1 binary64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a a)))
(/.f64 (*.f64 b (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 b (neg.f64 (*.f64 a a))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 #s(literal 1 binary64) b) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a a)))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) b) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (*.f64 b (*.f64 a a)) x-scale) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)
(/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a a))) #s(literal -1 binary64))
(*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))
(*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale))) b))
(*.f64 (*.f64 b (*.f64 a a)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 b a) (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 b x-scale) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 b (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) x-scale))
(*.f64 (*.f64 b (/.f64 a x-scale)) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale))))
(exp.f64 (+.f64 (log.f64 a) (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 x-scale y-scale))) #s(literal -1 binary64))))
(exp.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 x-scale y-scale))) #s(literal -1 binary64) (log.f64 a)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) (/.f64 a (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) a))
(/.f64 (neg.f64 a) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 a x-scale) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)
(/.f64 (/.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 a #s(literal -1 binary64)) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) a) (*.f64 y-scale (*.f64 x-scale y-scale)))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) a) #s(literal -1 binary64))
(*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 #s(literal 1 binary64) (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) a)
(*.f64 (/.f64 a x-scale) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (/.f64 a (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(exp.f64 (*.f64 (log.f64 (*.f64 x-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 x-scale)) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))) (neg.f64 x-scale)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale)))) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale)))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 x-scale (*.f64 y-scale (neg.f64 y-scale)))) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 x-scale (*.f64 y-scale (neg.f64 y-scale)))))
(neg.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))) (neg.f64 x-scale)))
(neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale)))) x-scale))
(/.f64 a (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)))
(/.f64 a (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(/.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))) y-scale))
(/.f64 (*.f64 a a) (*.f64 y-scale (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64)))))
(/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale)))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale) x-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))) (/.f64 y-scale (*.f64 a a))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale)))
(/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a a)))
(/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 y-scale (*.f64 a a)))
(/.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))) (neg.f64 (neg.f64 x-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 x-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 x-scale))
(/.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 y-scale (neg.f64 y-scale))))
(/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale (neg.f64 y-scale)) x-scale))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (*.f64 (*.f64 x-scale y-scale) (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 a)) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 a x-scale)) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (neg.f64 a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (/.f64 a x-scale)) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) a) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (neg.f64 a)) (*.f64 y-scale (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (/.f64 a x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)) (*.f64 (*.f64 x-scale y-scale) (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) y-scale))
(/.f64 (*.f64 (neg.f64 a) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 a) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 (*.f64 (neg.f64 a) (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) y-scale))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)) (*.f64 y-scale (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 a a))) (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))) (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a a)))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (/.f64 y-scale (*.f64 a a))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (neg.f64 (*.f64 a a))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (neg.f64 (*.f64 a a))) (*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))) y-scale))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))) (/.f64 y-scale (*.f64 a a))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (neg.f64 (*.f64 a a))) (*.f64 (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))) (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 y-scale (*.f64 a a))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) (neg.f64 (*.f64 a a))) (*.f64 (*.f64 x-scale y-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 y-scale (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale)))))
(/.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 (/.f64 y-scale (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 (/.f64 y-scale (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale)))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale)) (*.f64 (/.f64 y-scale (*.f64 a a)) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64)))))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale)))))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale)) (*.f64 (neg.f64 y-scale) (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale)) (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 (*.f64 b #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 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))) #s(literal 1 binary64)) x-scale)
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (neg.f64 a)) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (/.f64 a x-scale)) y-scale)
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) y-scale)
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #s(literal 1 binary64)) (/.f64 y-scale (*.f64 a a)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (*.f64 a a))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))))
(/.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal -1 binary64)) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (*.f64 b (*.f64 a a)) (*.f64 b #s(literal -4 binary64))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (/.f64 #s(literal 1 binary64) x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) x-scale)) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) x-scale)) y-scale)
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (/.f64 a (*.f64 x-scale y-scale))) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (/.f64 a (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (/.f64 (*.f64 a a) y-scale)) (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) (/.f64 (*.f64 a a) y-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) x-scale) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 x-scale y-scale)) y-scale)
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) x-scale) y-scale)
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) x-scale) (*.f64 x-scale y-scale))
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) (*.f64 x-scale y-scale)) x-scale)
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) (*.f64 x-scale x-scale)) y-scale)
(pow.f64 (*.f64 x-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale)) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale) x-scale) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 (*.f64 x-scale y-scale) a)) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))) (/.f64 y-scale (*.f64 a a))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale)) #s(literal -1 binary64))
(*.f64 b (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 b (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 b #s(literal -4 binary64))))
(*.f64 b (*.f64 b (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 b (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 b b) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 b b) (*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)))
(*.f64 (*.f64 b b) (/.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 #s(literal -4 binary64) (*.f64 b (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))))
(*.f64 a (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(*.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 (*.f64 b b) (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 b #s(literal -4 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))
(*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale)))
(*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)))
(*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))
(*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale)))) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)))
(*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) a) y-scale) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a a) y-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) y-scale) (*.f64 (*.f64 a (/.f64 a (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) y-scale) (/.f64 (*.f64 a (/.f64 a (*.f64 x-scale y-scale))) x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) b)
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 b b))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) (/.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale))
(*.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale)) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (*.f64 a (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (/.f64 (*.f64 a a) y-scale) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (/.f64 (*.f64 a a) x-scale) x-scale))
(*.f64 (/.f64 (/.f64 (*.f64 a a) x-scale) x-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) x-scale) (/.f64 a y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) y-scale) (/.f64 a x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) y-scale) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (/.f64 (*.f64 a a) y-scale) y-scale))
(*.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #s(literal -4 binary64))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b b)) (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) a) y-scale))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) a) (/.f64 a y-scale))
(*.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 b b)) (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 b b) x-scale)) (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) a)
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (*.f64 b (*.f64 #s(literal -4 binary64) a)))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 b b)) (*.f64 #s(literal -4 binary64) a))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 (*.f64 b b) #s(literal -4 binary64))) a)
(*.f64 (pow.f64 (/.f64 x-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(*.f64 (pow.f64 (/.f64 x-scale (*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (neg.f64 y-scale))))
(*.f64 (pow.f64 (/.f64 x-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) y-scale))
(exp.f64 (*.f64 (log.f64 (*.f64 x-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 x-scale)) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))) (neg.f64 x-scale)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale)))) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale)))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 x-scale (*.f64 y-scale (neg.f64 y-scale)))) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 x-scale (*.f64 y-scale (neg.f64 y-scale)))))
(neg.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))) (neg.f64 x-scale)))
(neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale)))) x-scale))
(/.f64 a (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)))
(/.f64 a (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(/.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))) y-scale))
(/.f64 (*.f64 a a) (*.f64 y-scale (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64)))))
(/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale)))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale) x-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))) (/.f64 y-scale (*.f64 a a))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale)))
(/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a a)))
(/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 y-scale (*.f64 a a)))
(/.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))) (neg.f64 (neg.f64 x-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 x-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 x-scale))
(/.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 y-scale (neg.f64 y-scale))))
(/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale (neg.f64 y-scale)) x-scale))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (*.f64 (*.f64 x-scale y-scale) (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 a)) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 a x-scale)) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (neg.f64 a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (/.f64 a x-scale)) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) a) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (neg.f64 a)) (*.f64 y-scale (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (/.f64 a x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)) (*.f64 (*.f64 x-scale y-scale) (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) y-scale))
(/.f64 (*.f64 (neg.f64 a) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 a) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 (*.f64 (neg.f64 a) (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) y-scale))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)) (*.f64 y-scale (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 a a))) (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))) (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a a)))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (/.f64 y-scale (*.f64 a a))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (neg.f64 (*.f64 a a))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (neg.f64 (*.f64 a a))) (*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))) y-scale))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))) (/.f64 y-scale (*.f64 a a))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (neg.f64 (*.f64 a a))) (*.f64 (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))) (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 y-scale (*.f64 a a))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) (neg.f64 (*.f64 a a))) (*.f64 (*.f64 x-scale y-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 y-scale (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale)))))
(/.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 (/.f64 y-scale (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 (/.f64 y-scale (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale)))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale)) (*.f64 (/.f64 y-scale (*.f64 a a)) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64)))))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale)))))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale)) (*.f64 (neg.f64 y-scale) (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale)) (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 (*.f64 b #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 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))) #s(literal 1 binary64)) x-scale)
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (neg.f64 a)) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (/.f64 a x-scale)) y-scale)
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) y-scale)
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #s(literal 1 binary64)) (/.f64 y-scale (*.f64 a a)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (*.f64 a a))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))))
(/.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal -1 binary64)) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (*.f64 b (*.f64 a a)) (*.f64 b #s(literal -4 binary64))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (/.f64 #s(literal 1 binary64) x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) x-scale)) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) x-scale)) y-scale)
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (/.f64 a (*.f64 x-scale y-scale))) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (/.f64 a (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (/.f64 (*.f64 a a) y-scale)) (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) (/.f64 (*.f64 a a) y-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) x-scale) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 x-scale y-scale)) y-scale)
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) x-scale) y-scale)
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) x-scale) (*.f64 x-scale y-scale))
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) (*.f64 x-scale y-scale)) x-scale)
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) (*.f64 x-scale x-scale)) y-scale)
(pow.f64 (*.f64 x-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale)) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale) x-scale) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 (*.f64 x-scale y-scale) a)) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))) (/.f64 y-scale (*.f64 a a))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale)) #s(literal -1 binary64))
(*.f64 b (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 b (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 b #s(literal -4 binary64))))
(*.f64 b (*.f64 b (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 b (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 b b) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 b b) (*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)))
(*.f64 (*.f64 b b) (/.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 #s(literal -4 binary64) (*.f64 b (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))))
(*.f64 a (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(*.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 (*.f64 b b) (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 b #s(literal -4 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))
(*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale)))
(*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)))
(*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))
(*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale)))) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)))
(*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) a) y-scale) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a a) y-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) y-scale) (*.f64 (*.f64 a (/.f64 a (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) y-scale) (/.f64 (*.f64 a (/.f64 a (*.f64 x-scale y-scale))) x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) b)
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 b b))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) (/.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale))
(*.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale)) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (*.f64 a (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (/.f64 (*.f64 a a) y-scale) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (/.f64 (*.f64 a a) x-scale) x-scale))
(*.f64 (/.f64 (/.f64 (*.f64 a a) x-scale) x-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) x-scale) (/.f64 a y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) y-scale) (/.f64 a x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) y-scale) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (/.f64 (*.f64 a a) y-scale) y-scale))
(*.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #s(literal -4 binary64))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b b)) (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) a) y-scale))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) a) (/.f64 a y-scale))
(*.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 b b)) (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 b b) x-scale)) (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) a)
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (*.f64 b (*.f64 #s(literal -4 binary64) a)))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 b b)) (*.f64 #s(literal -4 binary64) a))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 (*.f64 b b) #s(literal -4 binary64))) a)
(*.f64 (pow.f64 (/.f64 x-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(*.f64 (pow.f64 (/.f64 x-scale (*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (neg.f64 y-scale))))
(*.f64 (pow.f64 (/.f64 x-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))) #s(literal -1 binary64)) (/.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 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64)))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale)))) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale)))))
(neg.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale)))))
(neg.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale)))
(/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64)))))
(/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale)))))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale)) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale y-scale)) x-scale)
(/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale x-scale)) y-scale)
(/.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 b b) (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) x-scale)
(/.f64 (/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) x-scale) y-scale)
(/.f64 (/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) y-scale) x-scale)
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale)) #s(literal -1 binary64))
(*.f64 b (*.f64 b (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 b (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 b (/.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 b b) (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale)))))
(*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) #s(literal -4 binary64))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 b b) #s(literal -4 binary64))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 b b))
(*.f64 (/.f64 #s(literal -4 binary64) x-scale) (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 b x-scale) (/.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 b (*.f64 x-scale y-scale)) (/.f64 (*.f64 b #s(literal -4 binary64)) x-scale))
(*.f64 (/.f64 b (*.f64 x-scale x-scale)) (/.f64 (*.f64 b #s(literal -4 binary64)) y-scale))
(*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) (/.f64 #s(literal -4 binary64) x-scale))
(*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 #s(literal -4 binary64) y-scale))
(*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) y-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) y-scale))
(*.f64 (pow.f64 (/.f64 x-scale b) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b #s(literal -4 binary64))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 x-scale #s(literal -4 binary64)) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b b)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b b)) #s(literal -1 binary64)) (pow.f64 (/.f64 x-scale #s(literal -4 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale y-scale) b) #s(literal -1 binary64)) (pow.f64 (/.f64 x-scale (*.f64 b #s(literal -4 binary64))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale x-scale) b) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale (*.f64 b #s(literal -4 binary64))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale #s(literal -4 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale x-scale) #s(literal -4 binary64)) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale (*.f64 b b)) #s(literal -1 binary64)))
(*.f64 b (*.f64 b #s(literal -4 binary64)))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(*.f64 (*.f64 b #s(literal -4 binary64)) b)
(exp.f64 (*.f64 (log.f64 (*.f64 x-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 x-scale)) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))) (neg.f64 x-scale)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale)))) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale)))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 x-scale (*.f64 y-scale (neg.f64 y-scale)))) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 x-scale (*.f64 y-scale (neg.f64 y-scale)))))
(neg.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))) (neg.f64 x-scale)))
(neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale)))) x-scale))
(/.f64 a (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)))
(/.f64 a (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(/.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))) y-scale))
(/.f64 (*.f64 a a) (*.f64 y-scale (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64)))))
(/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale)))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale) x-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))) (/.f64 y-scale (*.f64 a a))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale)))
(/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a a)))
(/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 y-scale (*.f64 a a)))
(/.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))) (neg.f64 (neg.f64 x-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 x-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 x-scale))
(/.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 y-scale (neg.f64 y-scale))))
(/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale (neg.f64 y-scale)) x-scale))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (*.f64 (*.f64 x-scale y-scale) (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 a)) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 a x-scale)) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (neg.f64 a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (/.f64 a x-scale)) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) a) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (neg.f64 a)) (*.f64 y-scale (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (/.f64 a x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)) (*.f64 (*.f64 x-scale y-scale) (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) y-scale))
(/.f64 (*.f64 (neg.f64 a) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 a) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 (*.f64 (neg.f64 a) (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) y-scale))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)) (*.f64 y-scale (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 a a))) (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))) (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a a)))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (/.f64 y-scale (*.f64 a a))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (neg.f64 (*.f64 a a))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (neg.f64 (*.f64 a a))) (*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))) y-scale))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))) (/.f64 y-scale (*.f64 a a))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (neg.f64 (*.f64 a a))) (*.f64 (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))) (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 y-scale (*.f64 a a))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) (neg.f64 (*.f64 a a))) (*.f64 (*.f64 x-scale y-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 y-scale (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale)))))
(/.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 (/.f64 y-scale (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 (/.f64 y-scale (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale)))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale)) (*.f64 (/.f64 y-scale (*.f64 a a)) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64)))))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale)))))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale)) (*.f64 (neg.f64 y-scale) (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale)) (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 (*.f64 b #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 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))) #s(literal 1 binary64)) x-scale)
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (neg.f64 a)) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (/.f64 a x-scale)) y-scale)
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) y-scale)
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) #s(literal 1 binary64)) (/.f64 y-scale (*.f64 a a)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (*.f64 a a))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))))
(/.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal -1 binary64)) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (*.f64 b (*.f64 a a)) (*.f64 b #s(literal -4 binary64))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (/.f64 #s(literal 1 binary64) x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) x-scale)) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) x-scale)) y-scale)
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (/.f64 a (*.f64 x-scale y-scale))) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (/.f64 a (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (/.f64 (*.f64 a a) y-scale)) (*.f64 x-scale (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) (/.f64 (*.f64 a a) y-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) x-scale) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 x-scale y-scale)) y-scale)
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) x-scale) y-scale)
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) x-scale) (*.f64 x-scale y-scale))
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) (*.f64 x-scale y-scale)) x-scale)
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) (*.f64 x-scale x-scale)) y-scale)
(pow.f64 (*.f64 x-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale)) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale) x-scale) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 (*.f64 x-scale y-scale) a)) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64))) (/.f64 y-scale (*.f64 a a))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) #s(literal -4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale)) #s(literal -1 binary64))
(*.f64 b (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 b (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 b #s(literal -4 binary64))))
(*.f64 b (*.f64 b (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 b (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 b b) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 b b) (*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)))
(*.f64 (*.f64 b b) (/.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 #s(literal -4 binary64) (*.f64 b (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))))
(*.f64 a (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(*.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 (*.f64 b b) (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 b #s(literal -4 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))
(*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale)))
(*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale)))
(*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))
(*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale)))) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)))
(*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) a) y-scale) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a a) y-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) y-scale) (*.f64 (*.f64 a (/.f64 a (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) y-scale) (/.f64 (*.f64 a (/.f64 a (*.f64 x-scale y-scale))) x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) b)
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 b b))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale) (/.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) x-scale))
(*.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale)) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (*.f64 a (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (/.f64 (*.f64 a a) y-scale) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (/.f64 (*.f64 a a) x-scale) x-scale))
(*.f64 (/.f64 (/.f64 (*.f64 a a) x-scale) x-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) x-scale) (/.f64 a y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) y-scale) (/.f64 a x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) y-scale) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (/.f64 (*.f64 a a) y-scale) y-scale))
(*.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #s(literal -4 binary64))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b b)) (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) a) y-scale))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) a) (/.f64 a y-scale))
(*.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 b b)) (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 b b) x-scale)) (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) a)
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (*.f64 b (*.f64 #s(literal -4 binary64) a)))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 b b)) (*.f64 #s(literal -4 binary64) a))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 (*.f64 b b) #s(literal -4 binary64))) a)
(*.f64 (pow.f64 (/.f64 x-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(*.f64 (pow.f64 (/.f64 x-scale (*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (neg.f64 y-scale))))
(*.f64 (pow.f64 (/.f64 x-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) y-scale))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale)) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 y-scale (neg.f64 y-scale))) (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(neg.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 y-scale y-scale))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) y-scale)
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) #s(literal 1 binary64)) (*.f64 y-scale y-scale))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (neg.f64 (*.f64 y-scale (neg.f64 y-scale))))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) y-scale) (/.f64 (*.f64 a a) x-scale)) y-scale)
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) x-scale)
(pow.f64 (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))) #s(literal -1 binary64))
(*.f64 b (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 b b) (/.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (neg.f64 y-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) y-scale) (*.f64 a (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a (/.f64 a (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) y-scale))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(*.f64 (/.f64 (*.f64 b b) y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale)) y-scale))
(*.f64 (pow.f64 (/.f64 y-scale (*.f64 b b)) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) x-scale))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 x-scale (*.f64 a a)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) #s(literal 1 binary64)) (/.f64 x-scale (*.f64 a a)))
(/.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (neg.f64 (*.f64 a a))) (neg.f64 x-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) #s(literal -4 binary64))) (/.f64 x-scale (*.f64 a a)))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal -4 binary64))) (neg.f64 x-scale))
(/.f64 (neg.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) (neg.f64 x-scale))
(pow.f64 (/.f64 x-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64))
(*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale))))
(*.f64 b (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale)))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 a a) x-scale)))
(*.f64 a (*.f64 (/.f64 a x-scale) (*.f64 (*.f64 b b) #s(literal -4 binary64))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 a x-scale))
(*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 (*.f64 b b) #s(literal -4 binary64))))
(*.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (/.f64 (*.f64 a a) x-scale))
(*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale)) (*.f64 b b))
(*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) b) (*.f64 b #s(literal -4 binary64)))
(*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 b b)) #s(literal -4 binary64))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 x-scale y-scale) a)) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 y-scale (neg.f64 x-scale))) (/.f64 a (*.f64 y-scale (neg.f64 x-scale))))
(neg.f64 (/.f64 a (*.f64 y-scale (neg.f64 x-scale))))
(neg.f64 (/.f64 (neg.f64 a) (*.f64 x-scale y-scale)))
(/.f64 a (*.f64 x-scale y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale y-scale) a) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 a x-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (neg.f64 a) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (/.f64 a x-scale) y-scale)
(/.f64 (/.f64 a y-scale) x-scale)
(/.f64 (neg.f64 (neg.f64 a)) (neg.f64 (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (neg.f64 (/.f64 a x-scale)) (neg.f64 y-scale))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) a) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 x-scale y-scale) a) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 a x-scale)) #s(literal -1 binary64))
(*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 #s(literal 1 binary64) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (neg.f64 a) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (neg.f64 x-scale))))
(*.f64 (/.f64 a x-scale) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 a y-scale))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 a x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (pow.f64 (/.f64 #s(literal 1 binary64) a) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a a))) #s(literal -1 binary64)))
(exp.f64 (fma.f64 #s(literal 2 binary64) (log.f64 a) (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 x-scale y-scale))) #s(literal -1 binary64))))
(exp.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 x-scale y-scale))) #s(literal -1 binary64) (log.f64 (*.f64 a a))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) (/.f64 (*.f64 a a) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(neg.f64 (/.f64 (*.f64 a a) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(neg.f64 (/.f64 (neg.f64 (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a a)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a a)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (/.f64 (*.f64 a a) x-scale)))
(/.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 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 a a))))
(/.f64 (neg.f64 (*.f64 a a)) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)
(/.f64 (neg.f64 (/.f64 (*.f64 a a) x-scale)) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (neg.f64 (*.f64 a a))) (neg.f64 (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(/.f64 (/.f64 (/.f64 (*.f64 a a) x-scale) x-scale) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 x-scale y-scale)) y-scale)
(/.f64 (*.f64 (*.f64 a a) #s(literal -1 binary64)) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(pow.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 2 binary64))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) a) #s(literal -2 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a a)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a a)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (/.f64 (*.f64 a a) x-scale)) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (/.f64 (*.f64 x-scale y-scale) a)) #s(literal -1 binary64))
(*.f64 a (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (*.f64 a a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 a a))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 a a)) #s(literal -1 binary64)))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) a)
(*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 y-scale y-scale)))
(*.f64 (neg.f64 (*.f64 a a)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (/.f64 a x-scale) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 a x-scale))
(*.f64 (*.f64 a (/.f64 a (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (pow.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 a a)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) x-scale))
(*.f64 (/.f64 a (*.f64 x-scale x-scale)) (/.f64 a (*.f64 y-scale y-scale)))
(*.f64 (/.f64 a (*.f64 y-scale y-scale)) (/.f64 (/.f64 a x-scale) x-scale))
(*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (pow.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)) #s(literal -1 binary64)))
(*.f64 (/.f64 a (*.f64 y-scale (neg.f64 x-scale))) (/.f64 a (*.f64 y-scale (neg.f64 x-scale))))
(*.f64 (/.f64 (neg.f64 a) (*.f64 x-scale y-scale)) (/.f64 (neg.f64 a) (*.f64 x-scale y-scale)))
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale x-scale) a) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 y-scale y-scale) a) #s(literal -1 binary64)))
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale (*.f64 x-scale y-scale))
(*.f64 (*.f64 x-scale y-scale) y-scale)
(*.f64 (*.f64 y-scale y-scale) x-scale)
(exp.f64 (*.f64 (log.f64 (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(exp.f64 (neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 x-scale y-scale))) #s(literal -1 binary64))))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) #s(literal -1 binary64)))
(/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #s(literal -1 binary64))
(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))
(pow.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #s(literal -1 binary64))
(pow.f64 (*.f64 y-scale (neg.f64 x-scale)) #s(literal 2 binary64))
(*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))
(*.f64 x-scale (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) #s(literal 1 binary64)))
(*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))
(*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))
(*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))
(*.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) x-scale)
(*.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (/.f64 x-scale #s(literal 1 binary64)))
(*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) #s(literal 1 binary64))
(*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) y-scale)
(*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 y-scale (neg.f64 x-scale)))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 y-scale y-scale) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 y-scale (*.f64 a a))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 y-scale)) (/.f64 (*.f64 a a) (neg.f64 y-scale)))
(neg.f64 (/.f64 (*.f64 a a) (neg.f64 y-scale)))
(neg.f64 (/.f64 (neg.f64 (*.f64 a a)) y-scale))
(/.f64 (*.f64 a a) y-scale)
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (*.f64 a a)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 y-scale (*.f64 a a)) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 y-scale (*.f64 a a))))
(/.f64 (neg.f64 (*.f64 a a)) (neg.f64 y-scale))
(/.f64 (neg.f64 (neg.f64 (*.f64 a a))) (neg.f64 (neg.f64 y-scale)))
(pow.f64 (/.f64 y-scale (*.f64 a a)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 y-scale (*.f64 a a)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 a (/.f64 a y-scale))
(*.f64 (*.f64 a a) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a a) y-scale))
(*.f64 (neg.f64 (*.f64 a a)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (*.f64 a a))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 a a)) #s(literal -1 binary64)))
(*.f64 (/.f64 a y-scale) a)
(*.f64 x-scale (*.f64 x-scale y-scale))
(*.f64 y-scale (*.f64 x-scale x-scale))
(*.f64 (*.f64 x-scale y-scale) x-scale)
(*.f64 (*.f64 x-scale x-scale) y-scale)
(exp.f64 (*.f64 (log.f64 (/.f64 x-scale (*.f64 a a))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 x-scale)) (/.f64 (*.f64 a a) (neg.f64 x-scale)))
(neg.f64 (/.f64 (*.f64 a a) (neg.f64 x-scale)))
(neg.f64 (/.f64 (neg.f64 (*.f64 a a)) x-scale))
(/.f64 (*.f64 a a) x-scale)
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (*.f64 a a)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 x-scale (*.f64 a a)) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 x-scale (*.f64 a a))))
(/.f64 (neg.f64 (*.f64 a a)) (neg.f64 x-scale))
(/.f64 (neg.f64 (neg.f64 (*.f64 a a))) (neg.f64 (neg.f64 x-scale)))
(pow.f64 (/.f64 x-scale (*.f64 a a)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 x-scale (*.f64 a a)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 a (/.f64 a x-scale))
(*.f64 (*.f64 a a) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a a) x-scale))
(*.f64 (neg.f64 (*.f64 a a)) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)))
(*.f64 (/.f64 a x-scale) a)
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 a a))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 a a)) #s(literal -1 binary64)))

eval354.0ms (1%)

Memory
31.2MiB live, 968.1MiB allocated
Compiler

Compiled 71 956 to 1 810 computations (97.5% saved)

prune8.5s (24%)

Memory
-21.1MiB live, 29 930.5MiB allocated
Pruning

23 alts after pruning (23 fresh and 0 done)

PrunedKeptTotal
New2 562232 585
Fresh11011
Picked505
Done000
Total2 578232 601
Accuracy
98.4%
Counts
2 601 → 23
Alt Table
Click to see full alt table
StatusAccuracyProgram
68.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 x-scale) (*.f64 (*.f64 b b) #s(literal -4 binary64)))) (*.f64 y-scale y-scale)) x-scale))
68.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 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))))
62.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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale) x-scale)))
63.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 b b) #s(literal -4 binary64)) (*.f64 x-scale y-scale)) x-scale) (/.f64 (*.f64 a a) y-scale)))
86.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 b (*.f64 #s(literal -4 binary64) a)) b) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
79.4%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)))
67.0%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 (/.f64 a y-scale) a)))
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 b (*.f64 x-scale x-scale)) (/.f64 (*.f64 b #s(literal -4 binary64)) y-scale)) (/.f64 (*.f64 a a) y-scale)))
87.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 b y-scale) (/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) x-scale)) (/.f64 a (*.f64 x-scale y-scale))))
71.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 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 (*.f64 b b) #s(literal -4 binary64))) a))
81.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 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (*.f64 b (*.f64 #s(literal -4 binary64) a))))
81.5%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b b)) (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-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 b (*.f64 #s(literal -4 binary64) a)) b) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) y-scale)))))
68.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 b (*.f64 b (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))))) (/.f64 (*.f64 a a) y-scale)))
92.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 (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))))
71.4%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-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 b #s(literal -4 binary64)) (*.f64 (*.f64 b (/.f64 a x-scale)) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale))))))
81.2%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 b a) (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))))
71.0%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))))))
69.5%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 (/.f64 a (*.f64 y-scale y-scale)) (/.f64 (/.f64 a x-scale) x-scale)))))
88.0%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))))
81.3%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))))
Compiler

Compiled 1 076 to 644 computations (40.1% saved)

simplify164.0ms (0.5%)

Memory
23.3MiB live, 420.6MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)))
cost-diff320
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)
cost-diff384
(*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))
cost-diff0
(*.f64 b #s(literal -4 binary64))
cost-diff0
(*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale))
cost-diff0
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)))
cost-diff384
(/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)
cost-diff0
(*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)
cost-diff0
(*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a)
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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))))
cost-diff128
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)))
cost-diff0
(*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))
cost-diff0
(*.f64 b #s(literal -4 binary64))
cost-diff0
(*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))
cost-diff0
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))))
cost-diff0
(*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))
cost-diff0
(*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))))
cost-diff384
(*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale)))
Rules
7 826×lower-*.f32
7 782×lower-*.f64
2 438×lower-/.f32
2 424×lower-/.f64
2 086×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
078961
0110953
1256953
2970943
35241943
08045938
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))))
b
(*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))
#s(literal -4 binary64)
(/.f64 a (*.f64 x-scale y-scale))
a
(*.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 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))))
(*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))
(*.f64 b #s(literal -4 binary64))
b
#s(literal -4 binary64)
(*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))
a
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)
(/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))
x-scale
(*.f64 y-scale (*.f64 x-scale y-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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a)
(*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)
(*.f64 (*.f64 b b) #s(literal 4 binary64))
(*.f64 b b)
b
#s(literal 4 binary64)
a
(*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))
(*.f64 y-scale (neg.f64 x-scale))
y-scale
(neg.f64 x-scale)
x-scale
(*.f64 x-scale y-scale)
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)))
(*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale))
(*.f64 b #s(literal -4 binary64))
b
#s(literal -4 binary64)
(/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(*.f64 b (*.f64 a a))
(*.f64 a a)
a
(*.f64 y-scale (*.f64 x-scale y-scale))
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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)))
(*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))
(/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a))
(*.f64 b b)
b
(*.f64 #s(literal -4 binary64) a)
#s(literal -4 binary64)
a
(*.f64 x-scale y-scale)
x-scale
y-scale
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)
(/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))
#s(literal 1 binary64)
Outputs
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.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 #s(literal -4 binary64)) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 b (*.f64 b (*.f64 a #s(literal -4 binary64)))) (*.f64 x-scale y-scale))
b
(*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))
(/.f64 (*.f64 b (*.f64 a #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))
(/.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 x-scale y-scale))
#s(literal -4 binary64)
(/.f64 a (*.f64 x-scale y-scale))
a
(*.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 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) 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 b #s(literal -4 binary64)) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))
(*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 b #s(literal -4 binary64))
b
#s(literal -4 binary64)
(*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
a
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)
(/.f64 (*.f64 b a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 a (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))
(*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))
x-scale
(*.f64 y-scale (*.f64 x-scale y-scale))
(*.f64 x-scale (*.f64 y-scale y-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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a)
(*.f64 a (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64)))))
(*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)
(*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64))))
(*.f64 (*.f64 b b) #s(literal 4 binary64))
(*.f64 b (*.f64 b #s(literal 4 binary64)))
(*.f64 b b)
b
#s(literal 4 binary64)
a
(*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))
(*.f64 y-scale (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 y-scale (neg.f64 x-scale))
(neg.f64 (*.f64 x-scale y-scale))
y-scale
(neg.f64 x-scale)
x-scale
(*.f64 x-scale y-scale)
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.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 b #s(literal -4 binary64)) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale))
(*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 b #s(literal -4 binary64))
b
#s(literal -4 binary64)
(/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(*.f64 b (*.f64 a a))
(*.f64 a a)
a
(*.f64 y-scale (*.f64 x-scale y-scale))
(*.f64 x-scale (*.f64 y-scale y-scale))
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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))
(*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 b (*.f64 b (*.f64 a #s(literal -4 binary64)))) (*.f64 x-scale y-scale))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a))
(*.f64 b (*.f64 b (*.f64 a #s(literal -4 binary64))))
(*.f64 b b)
b
(*.f64 #s(literal -4 binary64) a)
(*.f64 a #s(literal -4 binary64))
#s(literal -4 binary64)
a
(*.f64 x-scale y-scale)
x-scale
y-scale
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)
(/.f64 a (*.f64 x-scale y-scale))
(/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))
#s(literal 1 binary64)

localize366.0ms (1%)

Memory
12.2MiB live, 1 132.4MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy3.4301103607754535
(*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))
accuracy5.474701867788223
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)
accuracy8.619295894719448
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a))
accuracy10.58063030099058
(/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale))
accuracy3.0432183282972343
(*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale))
accuracy3.9793581609333573
(/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)
accuracy9.25724658712877
(*.f64 b (*.f64 a a))
accuracy14.338392615220036
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale)))
accuracy0.22265625
(*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))
accuracy4.021674211790469
(*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a)
accuracy8.57095778590824
(*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)
accuracy12.969920316558113
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)))
accuracy3.283958315801776
(*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))
accuracy3.390127619126596
(*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))
accuracy4.740454935882972
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)
accuracy6.279198201139999
(/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
accuracy3.1403461997925053
(*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))))
accuracy3.4301103607754535
(*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale)))
accuracy4.819863734557046
(*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))
accuracy5.413465511913784
(/.f64 a (*.f64 x-scale y-scale))
Samples
179.0ms133×1valid
50.0ms33×2valid
46.0ms90×0valid
Compiler

Compiled 870 to 75 computations (91.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 227.0ms
ival-mult: 67.0ms (29.5% of total)
ival-sin: 43.0ms (18.9% of total)
ival-cos: 39.0ms (17.2% of total)
ival-div: 32.0ms (14.1% of total)
ival-pow2: 23.0ms (10.1% of total)
adjust: 11.0ms (4.8% of total)
ival-sub: 5.0ms (2.2% of total)
ival-add: 4.0ms (1.8% of total)
ival-pi: 2.0ms (0.9% of total)
ival-neg: 1.0ms (0.4% of total)
exact: 1.0ms (0.4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series132.0ms (0.4%)

Memory
-22.0MiB live, 415.5MiB allocated
Counts
27 → 1 140
Calls
Call 1
Inputs
#s(alt (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) #<representation binary64>) () ())
#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())
#s(alt (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) #<representation binary64>) () ())
#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())
#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())
#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) #<representation binary64>) () ())
#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (patch (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())
#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())
#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())
#s(alt (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) (patch (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())
#s(alt (*.f64 b (*.f64 a a)) (patch (*.f64 b (*.f64 a a)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())
Outputs
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) (patch (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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 inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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 inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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 inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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 inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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 -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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 -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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 -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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 -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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 a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 b) (#s(alt (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 b) (#s(alt (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 b) (#s(alt (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 b) (#s(alt (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf b) (#s(alt (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf b) (#s(alt (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf b) (#s(alt (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf b) (#s(alt (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf b) (#s(alt (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf b) (#s(alt (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf b) (#s(alt (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf b) (#s(alt (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 a) (#s(alt (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 a) (#s(alt (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 a) (#s(alt (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 a) (#s(alt (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf a) (#s(alt (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf a) (#s(alt (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf a) (#s(alt (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf a) (#s(alt (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf a) (#s(alt (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf a) (#s(alt (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf a) (#s(alt (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf a) (#s(alt (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (patch (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor 0 b) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor 0 b) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor 0 b) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor 0 b) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor inf b) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor inf b) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor inf b) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor inf b) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor -inf b) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor -inf b) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor -inf b) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor -inf b) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor 0 a) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor 0 a) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor 0 a) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor 0 a) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor inf a) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor inf a) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor inf a) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor inf a) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor -inf a) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor -inf a) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor -inf a) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor -inf a) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a b) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) (patch (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) 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))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) 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))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) 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))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) 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 inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) 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 inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) 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 inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) 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 inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) 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 -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) 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 -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) 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 -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) 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 -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) 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 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) 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 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) 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 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) 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 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor 0 b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor 0 b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor 0 b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor 0 b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor -inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor -inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor -inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor -inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) (patch (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)) #<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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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 a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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)))))) (* 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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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 (+ (* 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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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 y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.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))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 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 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (patch (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (patch (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (patch (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (patch (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (patch (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (patch (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (patch (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (patch (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (patch (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (patch (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (patch (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (patch (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (patch (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (patch (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (patch (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (patch (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (patch (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (patch (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (patch (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (patch (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (patch (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (patch (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (patch (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (patch (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) #<representation binary64>) () ())) ())
#s(alt (* 4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (patch (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale) (patch (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) 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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) (patch (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 a) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 a) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 a) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 a) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf a) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf a) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf a) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf a) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf a) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf a) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf a) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf a) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/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 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) (patch #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.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 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (patch (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 a) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 a) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 a) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 a) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf a) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf a) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf a) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf a) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf a) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf a) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf a) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf a) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale y-scale)) (patch (/.f64 a (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (/ (* a b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (patch (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (*.f64 x-scale (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale y-scale))) (patch (*.f64 x-scale (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale y-scale))) (patch (*.f64 x-scale (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale y-scale))) (patch (*.f64 x-scale (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale y-scale))) (patch (*.f64 x-scale (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale y-scale))) (patch (*.f64 x-scale (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale y-scale))) (patch (*.f64 x-scale (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale y-scale))) (patch (*.f64 x-scale (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale y-scale))) (patch (*.f64 x-scale (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale y-scale))) (patch (*.f64 x-scale (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale y-scale))) (patch (*.f64 x-scale (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale y-scale))) (patch (*.f64 x-scale (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale y-scale))) (patch (*.f64 x-scale (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale y-scale))) (patch (*.f64 x-scale (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale y-scale))) (patch (*.f64 x-scale (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale y-scale))) (patch (*.f64 x-scale (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale y-scale))) (patch (*.f64 x-scale (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale y-scale))) (patch (*.f64 x-scale (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale y-scale))) (patch (*.f64 x-scale (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale y-scale))) (patch (*.f64 x-scale (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale y-scale))) (patch (*.f64 x-scale (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale y-scale))) (patch (*.f64 x-scale (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale y-scale))) (patch (*.f64 x-scale (*.f64 y-scale (*.f64 x-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 y-scale (*.f64 x-scale y-scale))) (patch (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) (patch (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) (patch (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) (patch (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) (patch (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) (patch (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) (patch (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) (patch (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) (patch (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) (patch (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) (patch (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) (patch (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) (patch (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) (patch (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) (patch (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) (patch (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) (patch (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) (patch (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) (patch (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) (patch (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) (patch (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) (patch (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) (patch (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) (patch (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) (patch (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor 0 b) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor 0 b) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor 0 b) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor 0 b) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor inf b) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor inf b) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor inf b) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor inf b) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor -inf b) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor -inf b) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor -inf b) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor -inf b) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* x-scale (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (patch (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) b) (taylor 0 b) (#s(alt (*.f64 b (*.f64 a a)) (patch (*.f64 b (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) b) (taylor 0 b) (#s(alt (*.f64 b (*.f64 a a)) (patch (*.f64 b (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) b) (taylor 0 b) (#s(alt (*.f64 b (*.f64 a a)) (patch (*.f64 b (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) b) (taylor 0 b) (#s(alt (*.f64 b (*.f64 a a)) (patch (*.f64 b (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) b) (taylor inf b) (#s(alt (*.f64 b (*.f64 a a)) (patch (*.f64 b (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) b) (taylor inf b) (#s(alt (*.f64 b (*.f64 a a)) (patch (*.f64 b (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) b) (taylor inf b) (#s(alt (*.f64 b (*.f64 a a)) (patch (*.f64 b (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) b) (taylor inf b) (#s(alt (*.f64 b (*.f64 a a)) (patch (*.f64 b (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) b) (taylor -inf b) (#s(alt (*.f64 b (*.f64 a a)) (patch (*.f64 b (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) b) (taylor -inf b) (#s(alt (*.f64 b (*.f64 a a)) (patch (*.f64 b (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) b) (taylor -inf b) (#s(alt (*.f64 b (*.f64 a a)) (patch (*.f64 b (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) b) (taylor -inf b) (#s(alt (*.f64 b (*.f64 a a)) (patch (*.f64 b (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) b) (taylor 0 a) (#s(alt (*.f64 b (*.f64 a a)) (patch (*.f64 b (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) b) (taylor 0 a) (#s(alt (*.f64 b (*.f64 a a)) (patch (*.f64 b (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) b) (taylor 0 a) (#s(alt (*.f64 b (*.f64 a a)) (patch (*.f64 b (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) b) (taylor 0 a) (#s(alt (*.f64 b (*.f64 a a)) (patch (*.f64 b (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) b) (taylor inf a) (#s(alt (*.f64 b (*.f64 a a)) (patch (*.f64 b (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) b) (taylor inf a) (#s(alt (*.f64 b (*.f64 a a)) (patch (*.f64 b (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) b) (taylor inf a) (#s(alt (*.f64 b (*.f64 a a)) (patch (*.f64 b (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) b) (taylor inf a) (#s(alt (*.f64 b (*.f64 a a)) (patch (*.f64 b (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) b) (taylor -inf a) (#s(alt (*.f64 b (*.f64 a a)) (patch (*.f64 b (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) b) (taylor -inf a) (#s(alt (*.f64 b (*.f64 a a)) (patch (*.f64 b (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) b) (taylor -inf a) (#s(alt (*.f64 b (*.f64 a a)) (patch (*.f64 b (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) b) (taylor -inf a) (#s(alt (*.f64 b (*.f64 a a)) (patch (*.f64 b (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (patch (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) #<representation binary64>) () ())) ())
Calls

285 calls:

TimeVariablePointExpression
2.0ms
a
@-inf
(* (* b b) (* -4 a))
1.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
a
@0
(* b (* -4 (/ a (* x-scale y-scale))))
1.0ms
x-scale
@0
(* b (* -4 (/ a (* x-scale y-scale))))
1.0ms
x-scale
@inf
(* b (* -4 (/ a (* x-scale y-scale))))

simplify437.0ms (1.2%)

Memory
-9.7MiB live, 1 188.7MiB allocated
Algorithm
egg-herbie
Rules
12 594×lower-fma.f64
12 594×lower-fma.f32
7 682×lower-*.f64
7 682×lower-*.f32
4 686×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
021339024
179437174
2374636104
0804835464
Stop Event
iter limit
node limit
Counts
1 140 → 1 140
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 y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* x-scale y-scale)))
(* -4 (/ (* a b) (* 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))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(* 4 (* (pow a 2) (pow b 2)))
(* 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 (* 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)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 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)))
(/ 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))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(* (pow a 2) b)
(* (pow a 2) b)
(* (pow a 2) b)
(* (pow a 2) b)
(* (pow a 2) b)
(* (pow a 2) b)
(* (pow a 2) b)
(* (pow a 2) b)
(* (pow a 2) b)
(* (pow a 2) b)
(* (pow a 2) b)
(* (pow a 2) b)
(* (pow a 2) b)
(* (pow a 2) b)
(* (pow a 2) b)
(* (pow a 2) b)
(* (pow a 2) b)
(* (pow a 2) b)
(* (pow a 2) b)
(* (pow a 2) b)
(* (pow a 2) b)
(* (pow a 2) b)
(* (pow a 2) b)
(* (pow a 2) b)
(* -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)))
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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 #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 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal -1/787320000 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 #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 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 1/102036672000000 binary64) (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 (+.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 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.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)))) (neg.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 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)))) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (/.f64 (*.f64 (*.f64 (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 (*.f64 x-scale (*.f64 y-scale y-scale))))))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (*.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 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 b (*.f64 x-scale y-scale))))
(* -4 (/ (* a b) (* x-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 #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 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal -1/787320000 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 #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 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 1/102036672000000 binary64) (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 (+.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 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.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)))) (neg.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 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)))) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (/.f64 (*.f64 (*.f64 (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 (*.f64 x-scale (*.f64 y-scale y-scale))))))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (*.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 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 b)
(*.f64 #s(literal -4 binary64) b)
(* -4 b)
(*.f64 #s(literal -4 binary64) b)
(* -4 b)
(*.f64 #s(literal -4 binary64) b)
(* -4 b)
(*.f64 #s(literal -4 binary64) b)
(* -4 b)
(*.f64 #s(literal -4 binary64) b)
(* -4 b)
(*.f64 #s(literal -4 binary64) b)
(* -4 b)
(*.f64 #s(literal -4 binary64) b)
(* -4 b)
(*.f64 #s(literal -4 binary64) b)
(* -4 b)
(*.f64 #s(literal -4 binary64) b)
(* -4 b)
(*.f64 #s(literal -4 binary64) b)
(* -4 b)
(*.f64 #s(literal -4 binary64) b)
(* -4 b)
(*.f64 #s(literal -4 binary64) b)
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 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 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 #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 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal -1/787320000 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 #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 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 1/102036672000000 binary64) (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 (+.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 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.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)))) (neg.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 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)))) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (/.f64 (*.f64 (*.f64 (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 (*.f64 x-scale (*.f64 y-scale y-scale))))))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (*.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 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 #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 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal -1/787320000 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 #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 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 1/102036672000000 binary64) (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 (+.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 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.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)))) (neg.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 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)))) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (/.f64 (*.f64 (*.f64 (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 (*.f64 x-scale (*.f64 y-scale y-scale))))))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (*.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 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 x-scale (*.f64 x-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 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 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 2) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 #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 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal -1/787320000 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 #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 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 1/102036672000000 binary64) (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 (+.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 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.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)))) (neg.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 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)))) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (/.f64 (*.f64 (*.f64 (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 (*.f64 x-scale (*.f64 y-scale y-scale))))))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (*.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 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (pow x-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))) (pow y-scale 2))
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (-.f64 (*.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 (*.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 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b))) (*.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))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* a b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))
(* -1 (* (pow x-scale 2) (pow y-scale 2)))
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* x-scale (pow y-scale 2)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow a 2) b)
(*.f64 a (*.f64 a b))
(* (pow a 2) b)
(*.f64 a (*.f64 a b))
(* (pow a 2) b)
(*.f64 a (*.f64 a b))
(* (pow a 2) b)
(*.f64 a (*.f64 a b))
(* (pow a 2) b)
(*.f64 a (*.f64 a b))
(* (pow a 2) b)
(*.f64 a (*.f64 a b))
(* (pow a 2) b)
(*.f64 a (*.f64 a b))
(* (pow a 2) b)
(*.f64 a (*.f64 a b))
(* (pow a 2) b)
(*.f64 a (*.f64 a b))
(* (pow a 2) b)
(*.f64 a (*.f64 a b))
(* (pow a 2) b)
(*.f64 a (*.f64 a b))
(* (pow a 2) b)
(*.f64 a (*.f64 a b))
(* (pow a 2) b)
(*.f64 a (*.f64 a b))
(* (pow a 2) b)
(*.f64 a (*.f64 a b))
(* (pow a 2) b)
(*.f64 a (*.f64 a b))
(* (pow a 2) b)
(*.f64 a (*.f64 a b))
(* (pow a 2) b)
(*.f64 a (*.f64 a b))
(* (pow a 2) b)
(*.f64 a (*.f64 a b))
(* (pow a 2) b)
(*.f64 a (*.f64 a b))
(* (pow a 2) b)
(*.f64 a (*.f64 a b))
(* (pow a 2) b)
(*.f64 a (*.f64 a b))
(* (pow a 2) b)
(*.f64 a (*.f64 a b))
(* (pow a 2) b)
(*.f64 a (*.f64 a b))
(* (pow a 2) b)
(*.f64 a (*.f64 a 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)))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))

rewrite271.0ms (0.8%)

Memory
10.1MiB live, 689.2MiB allocated
Rules
4 878×lower-*.f32
4 834×lower-*.f64
3 424×lower-fma.f64
3 424×lower-fma.f32
3 114×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
078872
0110736
1448688
23463637
08419632
Stop Event
iter limit
node limit
iter limit
Counts
27 → 937
Calls
Call 1
Inputs
(*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.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 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale)))))
(*.f64 b (*.f64 #s(literal -4 binary64) (/.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 #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))))
(*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))
(*.f64 b #s(literal -4 binary64))
(*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale)))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) a)
(*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a)
(/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.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 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)))
(*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)))
(/.f64 (*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)
(*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))
(*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale)))
(*.f64 b (*.f64 a a))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a))
Outputs
(/.f64 a (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))))
(/.f64 a (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 x-scale y-scale)))
(/.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))))
(/.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a)))))
(/.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))))
(/.f64 (/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale)
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 a (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (*.f64 a (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 (*.f64 a (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale)) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) y-scale))
(/.f64 (*.f64 (neg.f64 a) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 (*.f64 (neg.f64 a) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))))
(/.f64 (*.f64 (neg.f64 a) (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))))
(/.f64 (*.f64 (/.f64 a x-scale) (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (neg.f64 a)) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (/.f64 a x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 a)) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 a x-scale)) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) y-scale))
(/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) a) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (neg.f64 a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (/.f64 a x-scale)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale) a) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale) (neg.f64 a)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale) (/.f64 a x-scale)) (*.f64 y-scale y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))) (neg.f64 x-scale))
(/.f64 (neg.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) #s(literal 1 binary64)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a)))))
(/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))) (neg.f64 x-scale))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale)) y-scale)
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)) (neg.f64 a)) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)) (/.f64 a x-scale)) y-scale)
(/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (*.f64 b a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (*.f64 (*.f64 b (*.f64 a a)) (*.f64 b #s(literal -4 binary64))) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 b #s(literal -4 binary64))) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a)))))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))) (*.f64 b #s(literal -4 binary64))) (neg.f64 x-scale))
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (/.f64 a (*.f64 x-scale y-scale))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale) (/.f64 a (*.f64 x-scale y-scale))) y-scale)
(/.f64 (/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) x-scale) y-scale)
(/.f64 (/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) y-scale) x-scale)
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (/.f64 (*.f64 x-scale y-scale) a)) #s(literal -1 binary64))
(pow.f64 (/.f64 x-scale (/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) #s(literal -1 binary64))
(*.f64 b (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale))))
(*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))))
(*.f64 #s(literal -4 binary64) (*.f64 b (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))))
(*.f64 a (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 a (*.f64 (/.f64 (*.f64 b a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) (*.f64 b #s(literal -4 binary64))))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 b (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (/.f64 (*.f64 b a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) (*.f64 b (*.f64 #s(literal -4 binary64) a)))
(*.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 b #s(literal -4 binary64))))
(*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) (*.f64 b #s(literal -4 binary64)))
(*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (/.f64 a (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))))
(*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) a) y-scale) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) (*.f64 b (*.f64 b #s(literal -4 binary64))))
(*.f64 (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) a)
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale))) b)
(*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))) b)
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (/.f64 (*.f64 b a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)) x-scale) (/.f64 a y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)) y-scale) (/.f64 a x-scale))
(*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) y-scale) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) x-scale))
(*.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) b) #s(literal -4 binary64))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) b) (/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b b)) (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) a) y-scale))
(*.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 b a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))) a)
(*.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))) b)
(*.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (/.f64 a (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))) 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 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (neg.f64 (*.f64 x-scale y-scale))))
(neg.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (neg.f64 (*.f64 x-scale y-scale))))
(neg.f64 (/.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))))
(/.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale) y-scale)
(/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) #s(literal -1 binary64)) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale)) (neg.f64 y-scale))
(/.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) y-scale) x-scale)
(/.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 #s(literal -4 binary64) a)) y-scale)
(/.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 #s(literal -4 binary64) a) y-scale)) x-scale)
(/.f64 (/.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) y-scale) (neg.f64 x-scale))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale)) #s(literal -1 binary64))
(*.f64 b (/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))) (*.f64 b b))
(*.f64 (/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) b)
(*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (/.f64 a (*.f64 x-scale y-scale)) b))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 (*.f64 b b) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) a) (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) #s(literal -1 binary64)))
(*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 #s(literal -4 binary64) a) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) a) y-scale) (/.f64 (*.f64 b b) x-scale))
(*.f64 (/.f64 b y-scale) (/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) x-scale))
(*.f64 (/.f64 b y-scale) (pow.f64 (/.f64 x-scale (*.f64 b (*.f64 #s(literal -4 binary64) a))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (pow.f64 (/.f64 y-scale (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale))
(*.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 b x-scale) (/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) y-scale))
(*.f64 (/.f64 (*.f64 b b) y-scale) (/.f64 (*.f64 #s(literal -4 binary64) a) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) a) x-scale) (/.f64 (*.f64 b b) y-scale))
(*.f64 (/.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) x-scale) (/.f64 a y-scale))
(*.f64 (/.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) y-scale) (/.f64 a x-scale))
(*.f64 (*.f64 (*.f64 b b) (/.f64 a (*.f64 x-scale y-scale))) #s(literal -4 binary64))
(*.f64 (pow.f64 (/.f64 x-scale b) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale (*.f64 b (*.f64 #s(literal -4 binary64) a))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 x-scale (*.f64 #s(literal -4 binary64) a)) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale (*.f64 b b)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 y-scale (*.f64 b b)) #s(literal -1 binary64)) (pow.f64 (/.f64 x-scale (*.f64 #s(literal -4 binary64) a)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 x-scale (*.f64 b (*.f64 b #s(literal -4 binary64)))) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale a) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 y-scale (*.f64 b (*.f64 b #s(literal -4 binary64)))) #s(literal -1 binary64)) (/.f64 a x-scale))
(/.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (neg.f64 a)) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 a x-scale)) y-scale)
(*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 #s(literal -4 binary64) (*.f64 b (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 #s(literal -4 binary64) (*.f64 (/.f64 a (*.f64 x-scale y-scale)) b))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b #s(literal -4 binary64)))
(*.f64 (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))) b)
(*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 b (/.f64 a (*.f64 x-scale y-scale))) #s(literal -4 binary64))
(*.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) a)
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 a (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 a (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))))
(/.f64 a (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 x-scale y-scale)))
(/.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))))
(/.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a)))))
(/.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))))
(/.f64 (/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale)
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 a (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (*.f64 a (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 (*.f64 a (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale)) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) y-scale))
(/.f64 (*.f64 (neg.f64 a) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 (*.f64 (neg.f64 a) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))))
(/.f64 (*.f64 (neg.f64 a) (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))))
(/.f64 (*.f64 (/.f64 a x-scale) (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (neg.f64 a)) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (/.f64 a x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 a)) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 a x-scale)) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) y-scale))
(/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) a) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (neg.f64 a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (/.f64 a x-scale)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale) a) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale) (neg.f64 a)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale) (/.f64 a x-scale)) (*.f64 y-scale y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))) (neg.f64 x-scale))
(/.f64 (neg.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) #s(literal 1 binary64)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a)))))
(/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))) (neg.f64 x-scale))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale)) y-scale)
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)) (neg.f64 a)) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)) (/.f64 a x-scale)) y-scale)
(/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (*.f64 b a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (*.f64 (*.f64 b (*.f64 a a)) (*.f64 b #s(literal -4 binary64))) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 b #s(literal -4 binary64))) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a)))))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))) (*.f64 b #s(literal -4 binary64))) (neg.f64 x-scale))
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (/.f64 a (*.f64 x-scale y-scale))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale) (/.f64 a (*.f64 x-scale y-scale))) y-scale)
(/.f64 (/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) x-scale) y-scale)
(/.f64 (/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) y-scale) x-scale)
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (/.f64 (*.f64 x-scale y-scale) a)) #s(literal -1 binary64))
(pow.f64 (/.f64 x-scale (/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) #s(literal -1 binary64))
(*.f64 b (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale))))
(*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))))
(*.f64 #s(literal -4 binary64) (*.f64 b (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))))
(*.f64 a (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 a (*.f64 (/.f64 (*.f64 b a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) (*.f64 b #s(literal -4 binary64))))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 b (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (/.f64 (*.f64 b a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) (*.f64 b (*.f64 #s(literal -4 binary64) a)))
(*.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 b #s(literal -4 binary64))))
(*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) (*.f64 b #s(literal -4 binary64)))
(*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (/.f64 a (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))))
(*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) a) y-scale) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) (*.f64 b (*.f64 b #s(literal -4 binary64))))
(*.f64 (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) a)
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale))) b)
(*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))) b)
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (/.f64 (*.f64 b a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)) x-scale) (/.f64 a y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)) y-scale) (/.f64 a x-scale))
(*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) y-scale) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) x-scale))
(*.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) b) #s(literal -4 binary64))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) b) (/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b b)) (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) a) y-scale))
(*.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 b a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))) a)
(*.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))) b)
(*.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (/.f64 a (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))) b)
(*.f64 b #s(literal -4 binary64))
(*.f64 #s(literal -4 binary64) b)
(exp.f64 (*.f64 (log.f64 (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a))))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale)))) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale)))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 x-scale)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale))) (neg.f64 x-scale)))
(neg.f64 (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale))) (neg.f64 x-scale)))
(neg.f64 (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))) x-scale))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale)
(/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale))) (neg.f64 (neg.f64 x-scale)))
(/.f64 #s(literal 1 binary64) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a)))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a))) x-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)) (*.f64 b (*.f64 a a))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a)))) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a))))))
(/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))) (neg.f64 x-scale))
(/.f64 (*.f64 b (neg.f64 (*.f64 a a))) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a))))
(/.f64 (*.f64 b (/.f64 (*.f64 a a) y-scale)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 b (*.f64 a a)) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (*.f64 (*.f64 b (neg.f64 (*.f64 a a))) #s(literal 1 binary64)) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a a) y-scale)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) x-scale))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale))) #s(literal 1 binary64)) x-scale)
(/.f64 (*.f64 (*.f64 b (*.f64 a a)) (/.f64 #s(literal 1 binary64) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 b (neg.f64 (*.f64 a a))) (/.f64 #s(literal 1 binary64) x-scale)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a a) y-scale)) (/.f64 #s(literal 1 binary64) x-scale)) (*.f64 x-scale y-scale))
(/.f64 (/.f64 (*.f64 b (*.f64 a a)) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(/.f64 (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))) #s(literal -1 binary64)) x-scale)
(pow.f64 (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a)))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a))) x-scale) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)) (*.f64 b (*.f64 a a))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 b (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 b (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale)))
(*.f64 b (/.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale))
(*.f64 a (/.f64 (*.f64 b a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (*.f64 a a) (/.f64 b (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (/.f64 a (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) (*.f64 b a))
(*.f64 (/.f64 (*.f64 b a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) a)
(*.f64 (*.f64 b (*.f64 a a)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)))
(*.f64 (/.f64 b y-scale) (*.f64 (*.f64 a (/.f64 a (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale)))
(*.f64 (/.f64 b y-scale) (/.f64 (*.f64 a (/.f64 a (*.f64 x-scale y-scale))) x-scale))
(*.f64 (*.f64 a (/.f64 a (*.f64 x-scale y-scale))) (/.f64 b (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) b)
(*.f64 (*.f64 b a) (/.f64 a (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 b x-scale))
(*.f64 (/.f64 b x-scale) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 b (*.f64 x-scale y-scale)) (*.f64 a (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 b (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 a a) x-scale))
(*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 b (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 b a) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 b a) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 b a) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))
(*.f64 (pow.f64 (/.f64 x-scale (*.f64 b (*.f64 a a))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (pow.f64 (/.f64 x-scale (*.f64 b (neg.f64 (*.f64 a a)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))))
(*.f64 (pow.f64 (/.f64 x-scale (*.f64 b (/.f64 (*.f64 a a) y-scale))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (neg.f64 (*.f64 a a))))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (neg.f64 (*.f64 a a))) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale)))))
(neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (neg.f64 (*.f64 a a)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (neg.f64 (*.f64 a a)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (neg.f64 (*.f64 a a))))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (neg.f64 (*.f64 a a))) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64)))) (neg.f64 (*.f64 x-scale y-scale))) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (neg.f64 (*.f64 x-scale y-scale))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64)))) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64)))) (/.f64 a x-scale)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (neg.f64 (*.f64 a a)))) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (neg.f64 (*.f64 x-scale y-scale)))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (*.f64 x-scale y-scale)) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64)))) (neg.f64 (*.f64 x-scale y-scale))) a) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))) #s(literal 1 binary64)) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64)))) (neg.f64 (*.f64 x-scale y-scale))) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64)))) (neg.f64 (*.f64 x-scale y-scale))) (neg.f64 a)) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64)))) (neg.f64 (*.f64 x-scale y-scale))) (/.f64 a x-scale)) y-scale)
(/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64)))) (/.f64 a (*.f64 x-scale y-scale))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))) y-scale) (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))) y-scale)
(/.f64 (/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (neg.f64 (*.f64 x-scale y-scale))) x-scale) y-scale)
(/.f64 (/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (neg.f64 (*.f64 x-scale y-scale))) y-scale) x-scale)
(pow.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (neg.f64 (*.f64 a a)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (neg.f64 (*.f64 a a)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (neg.f64 (*.f64 x-scale y-scale)))) #s(literal -1 binary64))
(*.f64 a (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (/.f64 a (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))))
(*.f64 a (*.f64 (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64)))) (/.f64 #s(literal -1 binary64) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))))
(*.f64 a (/.f64 (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64)))) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale)))))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64)))) (neg.f64 (*.f64 x-scale y-scale))))
(*.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 a (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 a (/.f64 a (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 (*.f64 a a) (/.f64 #s(literal -1 binary64) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale)))))
(*.f64 (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64)))) (/.f64 a (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale)))))
(*.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (/.f64 #s(literal -1 binary64) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (neg.f64 (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (neg.f64 (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64)))) (neg.f64 (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (pow.f64 (/.f64 (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale)) (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b)))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))))
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b)))) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (neg.f64 (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale)))) (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64)))))
(*.f64 (/.f64 a y-scale) (/.f64 (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64)))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64)))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))) (/.f64 a y-scale))
(*.f64 (/.f64 a (neg.f64 (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64)))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64)))) (*.f64 x-scale y-scale)) (/.f64 a (neg.f64 (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64)))) y-scale) (/.f64 a (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) y-scale) (/.f64 (*.f64 a a) (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a a) (neg.f64 (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (neg.f64 (*.f64 x-scale y-scale))) (*.f64 a (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))) (/.f64 (*.f64 a a) y-scale))
(*.f64 (/.f64 a (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))) (/.f64 (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64)))) y-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale y-scale))) (pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b)))) #s(literal -1 binary64)))
(*.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64)))) (neg.f64 (*.f64 x-scale y-scale))) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64)))) (neg.f64 (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) a)
(*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))) (pow.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 y-scale a) #s(literal -1 binary64)) (pow.f64 (/.f64 (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale)) (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale)) (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64))))) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale a) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 y-scale (*.f64 #s(literal 4 binary64) (*.f64 b b))) #s(literal -1 binary64)) (pow.f64 (/.f64 (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale)) (*.f64 a a)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 y-scale (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64))))) #s(literal -1 binary64)) (pow.f64 (/.f64 (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale)) a) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale)) a) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 4 binary64) (*.f64 b b))) #s(literal -1 binary64)) (pow.f64 (/.f64 (neg.f64 (*.f64 x-scale y-scale)) (*.f64 a a)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64))))) #s(literal -1 binary64)) (pow.f64 (/.f64 (neg.f64 (*.f64 x-scale y-scale)) a) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (neg.f64 (*.f64 x-scale y-scale)) a) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (neg.f64 (*.f64 x-scale y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 b b))) #s(literal -1 binary64)) (*.f64 a (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (pow.f64 (/.f64 (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale)) (*.f64 #s(literal 4 binary64) (*.f64 b b))) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale (*.f64 a a)) #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 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale)))))
(*.f64 b (*.f64 (*.f64 b #s(literal 4 binary64)) (*.f64 a a)))
(*.f64 a (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64)))))
(*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b)))
(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b)))
(*.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (*.f64 a a)))
(*.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) a))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 a a))
(*.f64 (*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64)))) a)
(*.f64 (*.f64 a (*.f64 b b)) (*.f64 a #s(literal 4 binary64)))
(*.f64 b (*.f64 b (*.f64 a #s(literal 4 binary64))))
(*.f64 b (*.f64 (*.f64 b #s(literal 4 binary64)) a))
(*.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 a #s(literal 4 binary64)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) a)
(*.f64 (*.f64 b a) (*.f64 b #s(literal 4 binary64)))
(*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))
(*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a))))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale)))) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale)))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 x-scale)) (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale))) (neg.f64 x-scale)))
(neg.f64 (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale))) (neg.f64 x-scale)))
(neg.f64 (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))) x-scale))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale)
(/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale))) (neg.f64 (neg.f64 x-scale)))
(/.f64 #s(literal 1 binary64) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a)))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a))) x-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)) (*.f64 b (*.f64 a a))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a)))) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a))))))
(/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))) (neg.f64 x-scale))
(/.f64 (*.f64 b (neg.f64 (*.f64 a a))) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a))))
(/.f64 (*.f64 b (/.f64 (*.f64 a a) y-scale)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 b (*.f64 a a)) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (*.f64 (*.f64 b (neg.f64 (*.f64 a a))) #s(literal 1 binary64)) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a a) y-scale)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) x-scale))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale))) #s(literal 1 binary64)) x-scale)
(/.f64 (*.f64 (*.f64 b (*.f64 a a)) (/.f64 #s(literal 1 binary64) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 b (neg.f64 (*.f64 a a))) (/.f64 #s(literal 1 binary64) x-scale)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 b (/.f64 (*.f64 a a) y-scale)) (/.f64 #s(literal 1 binary64) x-scale)) (*.f64 x-scale y-scale))
(/.f64 (/.f64 (*.f64 b (*.f64 a a)) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(/.f64 (/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))) #s(literal -1 binary64)) x-scale)
(pow.f64 (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a)))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a))) x-scale) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)) (*.f64 b (*.f64 a a))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 b (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 b (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale)))
(*.f64 b (/.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale))
(*.f64 a (/.f64 (*.f64 b a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (*.f64 a a) (/.f64 b (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (/.f64 a (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) (*.f64 b a))
(*.f64 (/.f64 (*.f64 b a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) a)
(*.f64 (*.f64 b (*.f64 a a)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)))
(*.f64 (/.f64 b y-scale) (*.f64 (*.f64 a (/.f64 a (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale)))
(*.f64 (/.f64 b y-scale) (/.f64 (*.f64 a (/.f64 a (*.f64 x-scale y-scale))) x-scale))
(*.f64 (*.f64 a (/.f64 a (*.f64 x-scale y-scale))) (/.f64 b (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) b)
(*.f64 (*.f64 b a) (/.f64 a (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 b x-scale))
(*.f64 (/.f64 b x-scale) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 b (*.f64 x-scale y-scale)) (*.f64 a (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 b (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 a a) x-scale))
(*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 b (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 b a) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 b a) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 b a) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))
(*.f64 (pow.f64 (/.f64 x-scale (*.f64 b (*.f64 a a))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (pow.f64 (/.f64 x-scale (*.f64 b (neg.f64 (*.f64 a a)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))))
(*.f64 (pow.f64 (/.f64 x-scale (*.f64 b (/.f64 (*.f64 a a) y-scale))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) 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 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 a (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))))
(/.f64 a (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 x-scale y-scale)))
(/.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))))
(/.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a)))))
(/.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))))
(/.f64 (/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale)
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 a (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (*.f64 a (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 (*.f64 a (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale)) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) y-scale))
(/.f64 (*.f64 (neg.f64 a) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 (*.f64 (neg.f64 a) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))))
(/.f64 (*.f64 (neg.f64 a) (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))))
(/.f64 (*.f64 (/.f64 a x-scale) (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (neg.f64 a)) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (/.f64 a x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 a)) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 a x-scale)) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) y-scale))
(/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) a) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (neg.f64 a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (/.f64 a x-scale)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale) a) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale) (neg.f64 a)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale) (/.f64 a x-scale)) (*.f64 y-scale y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))) (neg.f64 x-scale))
(/.f64 (neg.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) #s(literal 1 binary64)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a)))))
(/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))) (neg.f64 x-scale))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale)) y-scale)
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)) (neg.f64 a)) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)) (/.f64 a x-scale)) y-scale)
(/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (*.f64 b a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (*.f64 (*.f64 b (*.f64 a a)) (*.f64 b #s(literal -4 binary64))) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 b #s(literal -4 binary64))) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a)))))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))) (*.f64 b #s(literal -4 binary64))) (neg.f64 x-scale))
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (/.f64 a (*.f64 x-scale y-scale))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale) (/.f64 a (*.f64 x-scale y-scale))) y-scale)
(/.f64 (/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) x-scale) y-scale)
(/.f64 (/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) y-scale) x-scale)
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (/.f64 (*.f64 x-scale y-scale) a)) #s(literal -1 binary64))
(pow.f64 (/.f64 x-scale (/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) #s(literal -1 binary64))
(*.f64 b (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale))))
(*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))))
(*.f64 #s(literal -4 binary64) (*.f64 b (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))))
(*.f64 a (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 a (*.f64 (/.f64 (*.f64 b a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) (*.f64 b #s(literal -4 binary64))))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 b (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (/.f64 (*.f64 b a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) (*.f64 b (*.f64 #s(literal -4 binary64) a)))
(*.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 b #s(literal -4 binary64))))
(*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) (*.f64 b #s(literal -4 binary64)))
(*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (/.f64 a (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))))
(*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) a) y-scale) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) (*.f64 b (*.f64 b #s(literal -4 binary64))))
(*.f64 (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) a)
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale))) b)
(*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))) b)
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (/.f64 (*.f64 b a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)) x-scale) (/.f64 a y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)) y-scale) (/.f64 a x-scale))
(*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) y-scale) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) x-scale))
(*.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) b) #s(literal -4 binary64))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) b) (/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b b)) (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) a) y-scale))
(*.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 b a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))) a)
(*.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))) b)
(*.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (/.f64 a (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))) b)
(/.f64 a (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))))
(/.f64 a (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 x-scale y-scale)))
(/.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))))
(/.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a)))))
(/.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))))
(/.f64 (/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale)
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 a (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (*.f64 a (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 (*.f64 a (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale)) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) y-scale))
(/.f64 (*.f64 (neg.f64 a) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 (*.f64 (neg.f64 a) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))))
(/.f64 (*.f64 (neg.f64 a) (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))))
(/.f64 (*.f64 (/.f64 a x-scale) (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (neg.f64 a)) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (/.f64 a x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 a)) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 a x-scale)) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) y-scale))
(/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) a) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (neg.f64 a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (/.f64 a x-scale)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale) a) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale) (neg.f64 a)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale) (/.f64 a x-scale)) (*.f64 y-scale y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))) (neg.f64 x-scale))
(/.f64 (neg.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a a))) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) #s(literal 1 binary64)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a)))))
(/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))) (neg.f64 x-scale))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale)) y-scale)
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)) (neg.f64 a)) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)) (/.f64 a x-scale)) y-scale)
(/.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (*.f64 b a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (*.f64 (*.f64 b (*.f64 a a)) (*.f64 b #s(literal -4 binary64))) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 b #s(literal -4 binary64))) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a)))))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))) (*.f64 b #s(literal -4 binary64))) (neg.f64 x-scale))
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (/.f64 a (*.f64 x-scale y-scale))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale) (/.f64 a (*.f64 x-scale y-scale))) y-scale)
(/.f64 (/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) x-scale) y-scale)
(/.f64 (/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) y-scale) x-scale)
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (/.f64 (*.f64 x-scale y-scale) a)) #s(literal -1 binary64))
(pow.f64 (/.f64 x-scale (/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) #s(literal -1 binary64))
(*.f64 b (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale))))
(*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))))
(*.f64 #s(literal -4 binary64) (*.f64 b (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))))
(*.f64 a (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 a (*.f64 (/.f64 (*.f64 b a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) (*.f64 b #s(literal -4 binary64))))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) (*.f64 b (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (/.f64 (*.f64 b a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) (*.f64 b (*.f64 #s(literal -4 binary64) a)))
(*.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 b #s(literal -4 binary64))))
(*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) (*.f64 b #s(literal -4 binary64)))
(*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (/.f64 a (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))))
(*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) a) y-scale) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) (*.f64 b (*.f64 b #s(literal -4 binary64))))
(*.f64 (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) a)
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale))) b)
(*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))) b)
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (/.f64 (*.f64 b a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)) x-scale) (/.f64 a y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)) y-scale) (/.f64 a x-scale))
(*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) y-scale) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) x-scale))
(*.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) b) #s(literal -4 binary64))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) b) (/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b b)) (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b b) x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) a) y-scale))
(*.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 b a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))) a)
(*.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))) b)
(*.f64 (*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (/.f64 a (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))) b)
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 x-scale y-scale) a)) #s(literal -1 binary64)))
(exp.f64 (+.f64 (log.f64 a) (*.f64 (log.f64 (*.f64 x-scale y-scale)) #s(literal -1 binary64))))
(exp.f64 (fma.f64 (log.f64 (*.f64 x-scale y-scale)) #s(literal -1 binary64) (log.f64 a)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 x-scale y-scale))) (/.f64 a (neg.f64 (*.f64 x-scale y-scale))))
(neg.f64 (/.f64 a (neg.f64 (*.f64 x-scale y-scale))))
(neg.f64 (/.f64 (neg.f64 a) (*.f64 x-scale y-scale)))
(/.f64 a (*.f64 x-scale y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale y-scale) a) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 a x-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (neg.f64 a) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (/.f64 a x-scale) y-scale)
(/.f64 (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (/.f64 a x-scale)) (neg.f64 y-scale))
(/.f64 (/.f64 a y-scale) x-scale)
(/.f64 (*.f64 a #s(literal -1 binary64)) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) a) y-scale)
(/.f64 (/.f64 (neg.f64 a) y-scale) (neg.f64 x-scale))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) a) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 x-scale y-scale) a) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 a x-scale)) #s(literal -1 binary64))
(*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 #s(literal 1 binary64) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (pow.f64 (/.f64 #s(literal 1 binary64) a) #s(literal -1 binary64)))
(*.f64 (neg.f64 a) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale y-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 a y-scale))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (pow.f64 (/.f64 y-scale a) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 a x-scale))
(*.f64 (/.f64 a 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 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (neg.f64 (*.f64 x-scale y-scale))))
(neg.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (neg.f64 (*.f64 x-scale y-scale))))
(neg.f64 (/.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))))
(/.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale) y-scale)
(/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) #s(literal -1 binary64)) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale)) (neg.f64 y-scale))
(/.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) y-scale) x-scale)
(/.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 #s(literal -4 binary64) a)) y-scale)
(/.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 #s(literal -4 binary64) a) y-scale)) x-scale)
(/.f64 (/.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) y-scale) (neg.f64 x-scale))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale)) #s(literal -1 binary64))
(*.f64 b (/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))) (*.f64 b b))
(*.f64 (/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) (*.f64 x-scale y-scale)) b)
(*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (/.f64 a (*.f64 x-scale y-scale)) b))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 (*.f64 b b) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) a) (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) #s(literal -1 binary64)))
(*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 #s(literal -4 binary64) a) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) a) y-scale) (/.f64 (*.f64 b b) x-scale))
(*.f64 (/.f64 b y-scale) (/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) x-scale))
(*.f64 (/.f64 b y-scale) (pow.f64 (/.f64 x-scale (*.f64 b (*.f64 #s(literal -4 binary64) a))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (pow.f64 (/.f64 y-scale (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale))
(*.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 b x-scale) (/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) y-scale))
(*.f64 (/.f64 (*.f64 b b) y-scale) (/.f64 (*.f64 #s(literal -4 binary64) a) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) a) x-scale) (/.f64 (*.f64 b b) y-scale))
(*.f64 (/.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) x-scale) (/.f64 a y-scale))
(*.f64 (/.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) y-scale) (/.f64 a x-scale))
(*.f64 (*.f64 (*.f64 b b) (/.f64 a (*.f64 x-scale y-scale))) #s(literal -4 binary64))
(*.f64 (pow.f64 (/.f64 x-scale b) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale (*.f64 b (*.f64 #s(literal -4 binary64) a))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 x-scale (*.f64 #s(literal -4 binary64) a)) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale (*.f64 b b)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 y-scale (*.f64 b b)) #s(literal -1 binary64)) (pow.f64 (/.f64 x-scale (*.f64 #s(literal -4 binary64) a)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 x-scale (*.f64 b (*.f64 b #s(literal -4 binary64)))) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale a) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 y-scale (*.f64 b (*.f64 b #s(literal -4 binary64)))) #s(literal -1 binary64)) (/.f64 a x-scale))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 x-scale y-scale) a)) #s(literal -1 binary64)))
(exp.f64 (+.f64 (log.f64 a) (*.f64 (log.f64 (*.f64 x-scale y-scale)) #s(literal -1 binary64))))
(exp.f64 (fma.f64 (log.f64 (*.f64 x-scale y-scale)) #s(literal -1 binary64) (log.f64 a)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 x-scale y-scale))) (/.f64 a (neg.f64 (*.f64 x-scale y-scale))))
(neg.f64 (/.f64 a (neg.f64 (*.f64 x-scale y-scale))))
(neg.f64 (/.f64 (neg.f64 a) (*.f64 x-scale y-scale)))
(/.f64 a (*.f64 x-scale y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale y-scale) a) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 a x-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (neg.f64 a) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (/.f64 a x-scale) y-scale)
(/.f64 (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (/.f64 a x-scale)) (neg.f64 y-scale))
(/.f64 (/.f64 a y-scale) x-scale)
(/.f64 (*.f64 a #s(literal -1 binary64)) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) a) y-scale)
(/.f64 (/.f64 (neg.f64 a) y-scale) (neg.f64 x-scale))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) a) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 x-scale y-scale) a) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 a x-scale)) #s(literal -1 binary64))
(*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 #s(literal 1 binary64) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (pow.f64 (/.f64 #s(literal 1 binary64) a) #s(literal -1 binary64)))
(*.f64 (neg.f64 a) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale y-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 a y-scale))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (pow.f64 (/.f64 y-scale a) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 a x-scale))
(*.f64 (/.f64 a x-scale) (/.f64 #s(literal 1 binary64) y-scale))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) a))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale)))) (/.f64 a (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale)))))
(neg.f64 (/.f64 a (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale)))))
(/.f64 a (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) a)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 a x-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) a))))
(/.f64 (neg.f64 a) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 (/.f64 a x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (neg.f64 a)) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (neg.f64 (/.f64 a x-scale)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale)
(/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)
(pow.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) a)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) a)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 a x-scale)) #s(literal -1 binary64))
(*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 #s(literal 1 binary64) (/.f64 a (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (neg.f64 a) (/.f64 #s(literal -1 binary64) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) a)
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) (pow.f64 (/.f64 #s(literal 1 binary64) a) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))
(*.f64 (/.f64 a x-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 b (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)) (*.f64 b a)))
(/.f64 (*.f64 b a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(/.f64 (/.f64 (*.f64 b a) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (/.f64 (*.f64 b a) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(/.f64 (/.f64 (*.f64 b a) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale)
(/.f64 (neg.f64 (*.f64 b a)) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 (*.f64 b #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 b (neg.f64 a)) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 (*.f64 b (/.f64 a x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) b) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (neg.f64 a) b) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(/.f64 (*.f64 (/.f64 a x-scale) b) (*.f64 x-scale (*.f64 y-scale y-scale)))
(pow.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)) (*.f64 b a)) #s(literal -1 binary64))
(*.f64 b (/.f64 a (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) b))
(*.f64 a (/.f64 b (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 b (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) b)
(*.f64 (*.f64 b a) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (/.f64 a x-scale) (/.f64 b (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 b x-scale))
(exp.f64 (*.f64 (log.f64 (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(-.f64 #s(literal 0 binary64) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(neg.f64 (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))
(pow.f64 (neg.f64 (*.f64 x-scale y-scale)) #s(literal 2 binary64))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))
(*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))
(*.f64 y-scale (neg.f64 (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))
(*.f64 (*.f64 x-scale y-scale) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) x-scale)
(*.f64 (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)) #s(literal 1 binary64))
(*.f64 (neg.f64 (*.f64 x-scale y-scale)) (neg.f64 (*.f64 x-scale y-scale)))
(*.f64 #s(literal -1 binary64) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))))
(*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))
(*.f64 (*.f64 y-scale y-scale) (pow.f64 (/.f64 x-scale #s(literal 1 binary64)) #s(literal 2 binary64)))
(*.f64 (neg.f64 y-scale) (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale)))
(*.f64 (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale)) (neg.f64 y-scale))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(*.f64 (*.f64 x-scale x-scale) (pow.f64 (/.f64 y-scale #s(literal 1 binary64)) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 x-scale y-scale) x-scale) y-scale)
(*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) y-scale)
(*.f64 (neg.f64 (neg.f64 (*.f64 x-scale y-scale))) (*.f64 x-scale y-scale))
(*.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale))) y-scale)
(-.f64 #s(literal 0 binary64) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(neg.f64 (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(*.f64 x-scale (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale)))
(*.f64 (*.f64 x-scale y-scale) (neg.f64 (*.f64 x-scale y-scale)))
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))
(*.f64 (neg.f64 x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))
(*.f64 (neg.f64 (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(*.f64 #s(literal -1 binary64) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))
(*.f64 (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))) x-scale)
(*.f64 (neg.f64 (*.f64 (*.f64 x-scale y-scale) x-scale)) y-scale)
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a)))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))))
(neg.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 b (/.f64 (*.f64 a a) y-scale))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a)))))
(/.f64 (*.f64 b (neg.f64 (*.f64 a a))) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (*.f64 b (/.f64 (*.f64 a a) y-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 b (*.f64 a a)) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (*.f64 b (neg.f64 (*.f64 a a)))) (neg.f64 (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 b (/.f64 (*.f64 a a) y-scale))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 b y-scale) (*.f64 a a)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale y-scale)))) y-scale)
(/.f64 (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale y-scale)) y-scale)
(/.f64 (/.f64 (*.f64 b (/.f64 (*.f64 a a) y-scale)) x-scale) y-scale)
(/.f64 (/.f64 (*.f64 b (/.f64 (*.f64 a a) y-scale)) y-scale) x-scale)
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b (*.f64 a a))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (/.f64 (*.f64 a a) y-scale))) #s(literal -1 binary64))
(*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 a a) (/.f64 b (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 a a) (*.f64 b (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 b (*.f64 a a)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (*.f64 b (/.f64 (*.f64 a a) y-scale)))
(*.f64 (*.f64 b (neg.f64 (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 b y-scale) (*.f64 a (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a (/.f64 a (*.f64 x-scale y-scale))) (/.f64 b y-scale))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 a a))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a a)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 b (*.f64 a a))) #s(literal -1 binary64)))
(*.f64 (*.f64 b a) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 b a) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 b (/.f64 (*.f64 a a) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale y-scale))) b)
(*.f64 (/.f64 b (*.f64 x-scale y-scale)) (/.f64 (*.f64 a a) y-scale))
(*.f64 (/.f64 (*.f64 b a) (*.f64 x-scale y-scale)) (/.f64 a y-scale))
(*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 b (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 b a) y-scale) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (pow.f64 (/.f64 y-scale (*.f64 a a)) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 x-scale y-scale) b) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale y-scale) b) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale (*.f64 a a)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 y-scale (*.f64 b a)) #s(literal -1 binary64)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b a)) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale a) #s(literal -1 binary64)))
(exp.f64 (+.f64 (log.f64 b) (*.f64 #s(literal 2 binary64) (log.f64 a))))
(exp.f64 (fma.f64 #s(literal 2 binary64) (log.f64 a) (log.f64 b)))
(pow.f64 (*.f64 b (*.f64 a a)) #s(literal 1 binary64))
(*.f64 b (*.f64 a a))
(*.f64 a (*.f64 b a))
(*.f64 (*.f64 a a) b)
(*.f64 (*.f64 b a) a)
(*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
(*.f64 a (*.f64 b (*.f64 b #s(literal -4 binary64))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) a))
(*.f64 (*.f64 #s(literal -4 binary64) a) (*.f64 b b))
(*.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) a)
(*.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) b)
(*.f64 (*.f64 (*.f64 b b) a) #s(literal -4 binary64))

eval265.0ms (0.7%)

Memory
38.0MiB live, 858.1MiB allocated
Compiler

Compiled 63 913 to 1 798 computations (97.2% saved)

prune7.1s (19.8%)

Memory
1.4MiB live, 24 913.8MiB allocated
Pruning

26 alts after pruning (25 fresh and 1 done)

PrunedKeptTotal
New2 146122 158
Fresh51318
Picked415
Done000
Total2 155262 181
Accuracy
99.1%
Counts
2 181 → 26
Alt Table
Click to see full alt table
StatusAccuracyProgram
68.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 x-scale) (*.f64 (*.f64 b b) #s(literal -4 binary64)))) (*.f64 y-scale y-scale)) x-scale))
73.0%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) x-scale) a) (*.f64 x-scale (*.f64 y-scale y-scale))))
77.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 b a) (*.f64 b #s(literal 4 binary64))) a) (*.f64 (*.f64 y-scale (neg.f64 x-scale)) (*.f64 x-scale y-scale))))
86.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 a (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) a)))) (*.f64 x-scale y-scale))))
62.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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) x-scale) x-scale)))
63.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 b b) #s(literal -4 binary64)) (*.f64 x-scale y-scale)) x-scale) (/.f64 (*.f64 a a) y-scale)))
67.0%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 (/.f64 a y-scale) a)))
83.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 b a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) (*.f64 b (*.f64 #s(literal -4 binary64) a))))
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 b (*.f64 x-scale x-scale)) (/.f64 (*.f64 b #s(literal -4 binary64)) y-scale)) (/.f64 (*.f64 a a) y-scale)))
87.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 b y-scale) (/.f64 (*.f64 b (*.f64 #s(literal -4 binary64) a)) x-scale)) (/.f64 a (*.f64 x-scale y-scale))))
71.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 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 (*.f64 b b) #s(literal -4 binary64))) a))
81.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 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (*.f64 b (*.f64 #s(literal -4 binary64) a))))
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 b (*.f64 #s(literal -4 binary64) a)) b) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
68.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 b (*.f64 b (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))))) (/.f64 (*.f64 a a) y-scale)))
92.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 (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale))))
78.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 (*.f64 b (*.f64 #s(literal -4 binary64) a))) (/.f64 a (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))))
78.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 b b) (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 x-scale y-scale))) (/.f64 a (*.f64 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 b #s(literal -4 binary64)) (*.f64 (*.f64 b (/.f64 a x-scale)) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale))))))
81.2%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 b a) (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))))
69.5%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 (/.f64 a (*.f64 y-scale y-scale)) (/.f64 (/.f64 a x-scale) x-scale)))))
81.5%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 (*.f64 (*.f64 x-scale y-scale) x-scale) y-scale)) b))))
67.5%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) b))))
91.1%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 b (*.f64 x-scale y-scale))))))
80.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 a (*.f64 a (/.f64 b (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))))))
80.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 a (*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) b)))))
73.3%
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a #s(approx (* (/ a (* x-scale (* y-scale (* x-scale y-scale)))) b) (/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
Compiler

Compiled 4 272 to 794 computations (81.4% saved)

regimes185.0ms (0.5%)

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

8 calls:

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

Compiled 162 to 80 computations (50.6% saved)

regimes69.0ms (0.2%)

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

8 calls:

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

Compiled 162 to 80 computations (50.6% saved)

regimes59.0ms (0.2%)

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

8 calls:

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

Compiled 162 to 80 computations (50.6% saved)

regimes38.0ms (0.1%)

Memory
3.0MiB live, 125.6MiB allocated
Counts
12 → 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))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a #s(approx (* (/ a (* x-scale (* y-scale (* x-scale y-scale)))) b) (/.f64 (*.f64 a 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 #s(literal -4 binary64)) (*.f64 a (*.f64 a (/.f64 b (*.f64 y-scale (*.f64 (*.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 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) 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 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) 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 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 (*.f64 (*.f64 x-scale y-scale) x-scale) y-scale)) 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 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 #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 (*.f64 b a) (/.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (/.f64 a (*.f64 y-scale (*.f64 (*.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 b b) (*.f64 #s(literal -4 binary64) a)) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (*.f64 b (*.f64 #s(literal -4 binary64) a))))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 (*.f64 b b) #s(literal -4 binary64))) a))
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 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (*.f64 b (*.f64 #s(literal -4 binary64) a))))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 (*.f64 (*.f64 x-scale y-scale) x-scale) y-scale)) b))))
Calls

8 calls:

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

Compiled 162 to 80 computations (50.6% saved)

regimes5.0ms (0%)

Memory
18.4MiB live, 18.4MiB allocated
Counts
10 → 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))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a #s(approx (* (/ a (* x-scale (* y-scale (* x-scale y-scale)))) b) (/.f64 (*.f64 a 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 #s(literal -4 binary64)) (*.f64 a (*.f64 a (/.f64 b (*.f64 y-scale (*.f64 (*.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 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) 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 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) 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 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 (*.f64 (*.f64 x-scale y-scale) x-scale) y-scale)) 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 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 #s(literal -4 binary64)) (*.f64 b (/.f64 (*.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 b #s(literal -4 binary64)) (*.f64 (*.f64 b a) (/.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) a))) (/.f64 a (*.f64 y-scale (*.f64 (*.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 b b) (*.f64 #s(literal -4 binary64) a)) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 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 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) 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 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 (*.f64 (*.f64 x-scale y-scale) x-scale) y-scale)) b))))
Calls

1 calls:

4.0ms
y-scale
Results
AccuracySegmentsBranch
83.5%2y-scale
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes6.0ms (0%)

Memory
-20.1MiB live, 19.6MiB allocated
Counts
4 → 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))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a #s(approx (* (/ a (* x-scale (* y-scale (* x-scale y-scale)))) b) (/.f64 (*.f64 a 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 #s(literal -4 binary64)) (*.f64 a (*.f64 a (/.f64 b (*.f64 y-scale (*.f64 (*.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 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) 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 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) b))))
Outputs
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) 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 b #s(literal -4 binary64)) (*.f64 a (*.f64 a (/.f64 b (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))))))
Calls

2 calls:

3.0ms
x-scale
2.0ms
y-scale
Results
AccuracySegmentsBranch
81.3%1x-scale
83.1%2y-scale
Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes15.0ms (0%)

Memory
17.2MiB live, 57.7MiB allocated
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))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a #s(approx (* (/ a (* x-scale (* y-scale (* x-scale y-scale)))) b) (/.f64 (*.f64 a 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 #s(literal -4 binary64)) (*.f64 a (*.f64 a (/.f64 b (*.f64 y-scale (*.f64 (*.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 b #s(literal -4 binary64)) (*.f64 a (*.f64 a (/.f64 b (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale)))))))
Calls

8 calls:

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

Compiled 162 to 80 computations (50.6% saved)

regimes13.0ms (0%)

Memory
9.2MiB live, 49.0MiB allocated
Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

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

8 calls:

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

Compiled 162 to 80 computations (50.6% saved)

bsearch82.0ms (0.2%)

Memory
-26.5MiB live, 252.4MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
74.0ms
7.054055364553101e+150
2.2066612021676583e+152
Samples
33.0ms45×1valid
25.0ms23×2valid
11.0ms44×0valid
Compiler

Compiled 453 to 257 computations (43.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 62.0ms
ival-mult: 14.0ms (22.4% of total)
ival-sin: 12.0ms (19.2% of total)
ival-pow2: 10.0ms (16% of total)
ival-cos: 10.0ms (16% of total)
ival-div: 9.0ms (14.4% of total)
adjust: 4.0ms (6.4% of total)
ival-sub: 2.0ms (3.2% of total)
ival-add: 2.0ms (3.2% of total)
ival-pi: 1.0ms (1.6% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch26.0ms (0.1%)

Memory
-0.3MiB live, 78.9MiB allocated
Algorithm
binary-search
Stop Event
predicate-same
Steps
TimeLeftRight
23.0ms
2.947924811469532e+172
2.6232608097662605e+175
Samples
12.0ms15×1valid
7.0ms2valid
2.0ms10×0valid
Compiler

Compiled 213 to 107 computations (49.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 20.0ms
ival-mult: 4.0ms (20% of total)
ival-sin: 4.0ms (20% of total)
ival-div: 4.0ms (20% of total)
ival-pow2: 3.0ms (15% of total)
ival-cos: 3.0ms (15% of total)
adjust: 1.0ms (5% of total)
ival-sub: 1.0ms (5% of total)
ival-add: 1.0ms (5% of total)
ival-pi: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
2.2MiB live, 2.1MiB allocated
Algorithm
binary-search
Stop Event
predicate-same
Steps
TimeLeftRight
0.0ms
2.947924811469532e+172
2.6232608097662605e+175
Compiler

Compiled 213 to 107 computations (49.8% saved)

bsearch24.0ms (0.1%)

Memory
-10.1MiB live, 72.2MiB allocated
Algorithm
binary-search
Stop Event
predicate-same
Steps
TimeLeftRight
21.0ms
2.947924811469532e+172
2.6232608097662605e+175
Samples
9.0ms13×1valid
6.0ms2valid
4.0ms13×0valid
Compiler

Compiled 309 to 167 computations (46% saved)

Precisions
Click to see histograms. Total time spent on operations: 18.0ms
ival-mult: 4.0ms (22.6% of total)
ival-sin: 3.0ms (16.9% of total)
ival-pow2: 3.0ms (16.9% of total)
ival-cos: 3.0ms (16.9% of total)
ival-div: 2.0ms (11.3% of total)
adjust: 1.0ms (5.6% of total)
ival-sub: 1.0ms (5.6% of total)
ival-add: 1.0ms (5.6% of total)
ival-pi: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

simplify15.0ms (0%)

Memory
8.0MiB live, 47.5MiB allocated
Algorithm
egg-herbie
Rules
62×*-commutative_binary64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01051552
11361552
Stop Event
saturated
Calls
Call 1
Inputs
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.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 #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 b (*.f64 x-scale y-scale))))))
(if (<=.f64 x-scale #s(literal 204999999999999989711458377763101498760906283856175676989326880067557495538714866679547374074093507048182228609134882458644177573068665890960077320355840 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 b a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) (*.f64 b (*.f64 #s(literal -4 binary64) a)))) #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))))
(if (<=.f64 y-scale #s(literal 50000000000000000701959312789985260891230985285064568046915021472510652274325054054092066621782843422306142881889050953096494638431569844936383886042210844858380302841544704 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 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (*.f64 b (*.f64 #s(literal -4 binary64) a)))) #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 (*.f64 (*.f64 x-scale y-scale) x-scale) y-scale)) b)))))
(if (<=.f64 y-scale #s(literal 50000000000000000701959312789985260891230985285064568046915021472510652274325054054092066621782843422306142881889050953096494638431569844936383886042210844858380302841544704 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 #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) 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 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 (*.f64 (*.f64 x-scale y-scale) x-scale) y-scale)) b)))))
(if (<=.f64 y-scale #s(literal 100000000000000001403918625579970521782461970570129136093830042945021304548650108108184133243565686844612285763778101906192989276863139689872767772084421689716760605683089408 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 #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) 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 b #s(literal -4 binary64)) (*.f64 a (*.f64 a (/.f64 b (*.f64 y-scale (*.f64 (*.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 b #s(literal -4 binary64)) (*.f64 a (*.f64 a (/.f64 b (*.f64 y-scale (*.f64 (*.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 b #s(literal -4 binary64)) (*.f64 a #s(approx (* (/ a (* x-scale (* y-scale (* x-scale y-scale)))) b) (/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 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 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 a (*.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 x-scale y-scale)) (*.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.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 #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 b (*.f64 x-scale y-scale))))))
(if (<=.f64 x-scale #s(literal 204999999999999989711458377763101498760906283856175676989326880067557495538714866679547374074093507048182228609134882458644177573068665890960077320355840 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 b a) (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))) (*.f64 b (*.f64 #s(literal -4 binary64) a)))) #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b)))))
(if (<=.f64 x-scale #s(literal 204999999999999989711458377763101498760906283856175676989326880067557495538714866679547374074093507048182228609134882458644177573068665890960077320355840 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 b a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 b (*.f64 a #s(literal -4 binary64))))) #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 b (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))))))
(if (<=.f64 y-scale #s(literal 50000000000000000701959312789985260891230985285064568046915021472510652274325054054092066621782843422306142881889050953096494638431569844936383886042210844858380302841544704 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 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) b) (*.f64 b (*.f64 #s(literal -4 binary64) a)))) #s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 (*.f64 (*.f64 x-scale y-scale) x-scale) y-scale)) b)))))
(if (<=.f64 y-scale #s(literal 50000000000000000701959312789985260891230985285064568046915021472510652274325054054092066621782843422306142881889050953096494638431569844936383886042210844858380302841544704 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 a #s(literal -4 binary64))) (*.f64 b (/.f64 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 b #s(literal -4 binary64)) (*.f64 a (*.f64 b (/.f64 a (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))))))
(if (<=.f64 y-scale #s(literal 50000000000000000701959312789985260891230985285064568046915021472510652274325054054092066621782843422306142881889050953096494638431569844936383886042210844858380302841544704 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 #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) 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 b #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 (*.f64 (*.f64 x-scale y-scale) x-scale) y-scale)) b)))))
(if (<=.f64 y-scale #s(literal 50000000000000000701959312789985260891230985285064568046915021472510652274325054054092066621782843422306142881889050953096494638431569844936383886042210844858380302841544704 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 #s(literal -4 binary64)) (*.f64 a (*.f64 b (/.f64 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 b #s(literal -4 binary64)) (*.f64 a (*.f64 b (/.f64 a (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))))))
(if (<=.f64 y-scale #s(literal 100000000000000001403918625579970521782461970570129136093830042945021304548650108108184133243565686844612285763778101906192989276863139689872767772084421689716760605683089408 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 #s(literal -4 binary64)) (*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) 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 b #s(literal -4 binary64)) (*.f64 a (*.f64 a (/.f64 b (*.f64 y-scale (*.f64 (*.f64 x-scale y-scale) x-scale))))))))
(if (<=.f64 y-scale #s(literal 100000000000000001403918625579970521782461970570129136093830042945021304548650108108184133243565686844612285763778101906192989276863139689872767772084421689716760605683089408 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 #s(literal -4 binary64)) (*.f64 a (*.f64 b (/.f64 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 b #s(literal -4 binary64)) (*.f64 a (*.f64 a (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))))))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 a (/.f64 b (*.f64 y-scale (*.f64 (*.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 b #s(literal -4 binary64)) (*.f64 a (*.f64 a (/.f64 b (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))))))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a #s(approx (* (/ a (* x-scale (* y-scale (* x-scale y-scale)))) b) (/.f64 (*.f64 a 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 #s(literal -4 binary64)) (*.f64 a #s(approx (* (/ a (* x-scale (* y-scale (* x-scale y-scale)))) b) (/.f64 (*.f64 b a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))

soundness800.0ms (2.2%)

Memory
20.1MiB live, 1 140.4MiB allocated
Rules
12 594×lower-fma.f64
12 594×lower-fma.f32
11 112×lower-fma.f64
11 112×lower-fma.f32
9 850×lower-*.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
021339024
179437174
2374636104
0804835464
0126827
0214732
1779613
26836613
08041608
045216440
1176515416
0852315091
078872
0110736
1448688
23463637
08419632
073854
0100718
1433656
23447617
08397612
Stop Event
fuel
iter limit
node limit
iter limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
iter limit
iter limit
node limit
Compiler

Compiled 1 197 to 643 computations (46.3% saved)

preprocess102.0ms (0.3%)

Memory
-14.0MiB live, 304.7MiB allocated
Remove

(abs a)

(abs b)

(abs angle)

(abs x-scale)

(abs y-scale)

Compiler

Compiled 1 624 to 668 computations (58.9% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...